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

12 Окт 2019 в 13:42
207 +1
0
Ответы
1

var
i: Integer;

begin
i := 10;
while i >= 1 do
begin
writeln(i);
i := i - 1;
end;
end.

19 Апр 2024 в 11:51
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир