Регистрация
Войти
Стать экспертом Правила
Информатика

Срочно!!! Пожалуйста посчитайте!!!! С помощью WhileВывести на экран (в строчку) числа от 20 до 50В ПАСКАЛЕ​

ОТВЕТЫ

program n1;

var n: integer;

begin

n := 20;

while n <= 50 do

begin

write (n:5);

n := n + 1

end

end.

518
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам