Сколько различных значений числа d можно ввести, чтобы после выполнения программы было напечатано 171?
var n, s, d: integer;
begin
readln(d);
n := 27;
s := 12;
while s <= 2019 do begin
s := s + d;
n := n + 16
end;
write(n)
end.
Ответа на этот вопрос пока нет. Попробуйте найти его через форму поиска.
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
8 лет назад