Предмет: Информатика, автор: alekseysh898

Дано вещественное положительное число 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.

Объяснение:

Похожие вопросы
Предмет: Русский язык, автор: Зоинка