Question

Помогите пожалуйста. Выведите числа от 18 до 10. (цикл while)Пожалуйстаа-а-а!​

Answer 1

Ответ:

program Chernovik;

var i: integer;

begin

i:=18;

while i>9 do

begin

write(i,' ');

i:=i-1

end

end.