Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
маркинала
16.03.2022 14:55 •
Информатика
С Вывести на экран (в строчку) числа от 20 до 50
В ПАСКАЛЕ
Ответ:
Апслтел
18.08.2020 20:21
program n1;
var n: integer;
begin
n := 20;
while n <= 50 do
begin
write (n:5);
n := n + 1
end
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Qwertyuiopasdfghjkzz
28.03.2022 10:42
Аня и маня имеют фамилии строгова и добрынина. какую фамилию имеет каждая из девочек, если известно, что маня и добрынина одноклассницы?...
Loskinstem5617
25.07.2021 09:12
Запиши развернутую запись числа 0,346 для дробной части числа большое, отмечу как лучший ответ и нажму...
Yaroslav1RUS
01.07.2021 04:31
1. Напишите программу, которая получает натуральные числа A и B(A...
nastabugrim
22.01.2020 06:08
Оцените информационный объем моноаудиофайла длительностью 1 сек при частоте дискретизации 38000 и разрешении 8 битов...
nikitkaandreev1
25.09.2021 23:48
Во ДАЖЕ ЗА 1 ОТВЕТ ТОЛЬКО ПРАВИЛЬНО Текстовый редактор - программа, предназначенная для a) управление ресурсами ПК при создании документов b) работы с изображениями...
ujbgb
25.09.2021 23:48
Які існують групи ефектів анімації для об єктів...
fefmweoiwefio
09.03.2022 10:54
решить тест Тест «Среда программирования Pascal» 1) Какие имена программы допустимы в среде программирования Паскаль: а)picture б)самолет6 в) Myris 20 г) slon_132...
Fara3747
01.06.2023 12:44
1,2 (x-5)=0,2x+6; 1,3 (t-0,6)=1,8t; 5/7 (x+3)= - 2 (1-x); 6 (4x-7)-3 (5-8x)=0....
mashkakornilova
01.06.2023 12:44
5примеров защиты населения от селевых потоков...
Midaw
01.06.2023 12:44
составьте 20 словосочетаний с имён прилагательных по значению....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
program n1;
var n: integer;
begin
n := 20;
while n <= 50 do
begin
write (n:5);
n := n + 1
end
end.