Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
19942424
13.12.2021 07:42 •
Информатика
Паскаль .вывести квадраты всех чисел от a до b. ( значения а и b вводятся с клавиатуры; b> =a).для выполнения организовать цикл с предусловием.
Ответ:
новичок624
17.08.2020 07:57
var
a, b: integer;
begin
readln(a, b);
while a <= b do
begin
write(sqr(a), ' ');
a += 1;
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
toster1336
25.01.2020 00:34
Расстояние между двумя городами равно 480 км. Определи расстояние между изображениями этих городов на карте, если числовой масштаб карты равен...
LilianaLiLi1
14.02.2021 09:52
Определи назначение датчика ультразвука 301116446929333 помагите...
DISTANOV
17.05.2023 00:17
Объясните понятие «Авторское право» и «плагиат»...
250alina250
07.01.2020 02:39
Переведите из десятичной системы в двоичную число 101.625...
PeaceMaker1337
28.04.2021 09:47
Выгодное или не выгодное положение нигерии? почему?...
gfeee1
28.04.2021 09:47
Сколько существует основных двигательных...
ProKingcool
28.04.2021 09:47
Найти значение выражения -а +в если: а) а=25 в=30 в)а=30 в = -30 с) а=-40 в=50...
nikop65
28.04.2021 09:47
При взаимодействии 15 г аминоуксусной кислоты с гидроксидом калия образовалась соль массой 18,08 г. массовая доля выхода соли (%)? желательно расписать все действия,...
drxayala1
28.04.2021 09:47
10л 30% соляной кислоты смешали с 4л 95% соляной кислоты,какая концентрация полученной смеси?...
Зеф3
28.04.2021 09:47
7класс 22 .определите давление,оказываемое на почву поля трактором массой 2,5 т,если опора одной гусеницы 3м,а ширина 50 см?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
a, b: integer;
begin
readln(a, b);
while a <= b do
begin
write(sqr(a), ' ');
a += 1;
end;
end.