Выводить числа в порядке убывания от 10 до 1 паскаль. со счетчиком нужен текст программы со всеми var begin end итд делать через while

Avetazatan Avetazatan    3   25.09.2019 03:40    3

Ответы
termos68 termos68  08.10.2020 17:18
Var a:integer;
begin
a:=10;
while a>=1 do
begin
writeln(a);
a:=a-1
end
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика