При каком наибольшем введенном числе d после выполнения программы будет напечатано 150?
var n, s, d: integer;
Begin
readln(d);
n := 3;
s := 38;
while s <= 1200 do begin
s := s + d;
n := n + 7
end;
Write(n)
End.
1valeria:
какое наибольшее число получилось? в ответе надо указать целое число.
21*7+3 = 150 получаем 150 на вывод
Ответы
Ответ дал:
0
Ответ:
d=57
Объяснение:
немного изменим программу, пусть сама считает
var
n, s, d: integer;
k: integer;
Begin
n:=0;
d:=1;
while n <> 150 do begin
n := 3;
s := 38;
while s <= 1200 do begin
s := s + d;
n := n + 7
end;
inc(d);
end;
writeln('d=', d, ' n=', n);
End.
Приложения:
![](https://st.uroker.com/files/35c/35ca7527eb954b72470e4525f03967d4.png)
Вас заинтересует
11 месяцев назад
11 месяцев назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад