Задание
Запиши ответ
Выясни, какое минимальное значение числа d следует ввести, чтобы после выполнения программы было напечатано 150.
var n, s, d: integer;
begin
readln(d);
n:=3; s:=38;
while s\le1200 do
begin
s:=s+d;
n:=n+7
end;
write(n)
end.
Ответ: .