Дано вещественное положительное число X. Последовательно уменьшая его на 2.8, выводить это число, пока оно будет оставаться положительным
Pascal ABC net
Ответы
Ответ дал:
0
Ответ:
var x:real;
BEGIN
readln(x);
x:=x-2.8;
while (x>=0) do begin
writeln(x);
x:=x-2.8;
end;
END.
Объяснение:
Похожие вопросы
1 год назад
2 года назад
8 лет назад
8 лет назад
9 лет назад