Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
andreyylysp08r6o
26.01.2022 21:44 •
Информатика
Составить таблицу квадратов,первых двадцати положительных чисел 1
Показать ответ
Ответ:
gravasamp
24.05.2020 01:22
For a := 1 to 20 do
begin
writeln(a,"^2 = ", a*a);
end
или
a:= 1;
repeat
writeln(a,"^2 = ", a*a);
a := a + 1;
until a > 20;
0,0
(0 оценок)
Популярные вопросы: Информатика
Виктория10000000
02.01.2021 00:54
Решите пример: у=81+16764 +23 Дана программа на языке программирования Паскаль для решения данного примера Заполни пропускиVarV:realBegin:=1} 81+167/64+232}(81+167)/(64+23)3}81+16764...
sms29889855
14.10.2021 16:54
решить! Определите среднее время отклика с узлом www.ya.ru. Как это сделать?...
орпна
26.12.2021 02:58
Выбери верно заданный диапазон. A15:47 A15:D47 15A:47D A15^D47 15:47...
pedro2408
30.07.2022 09:50
1) Как при решении задач обозначают информационный объем сообщения?:1)I2)K3)L2) К какому виду программного обеспечения относят текстовые и графические редакторы, редакторы презентаций,...
matumaxim
29.03.2020 18:09
Задания по информатике Определите результат операции присваивание А=1 В=2 1)А=А+В 2)В=2*А 3)С=А 4) А=В 5)В=С 6) А=А-В 7) А= А-В 8) В=В²...
ZEWER
29.07.2022 22:21
Потрібно написати програму у python, в якій потрібно накопичити суму чисел, що дорівнює РІВНО 100 з випадкових чисел від 1 до 10, якщо сума стає більша за 100, то починаємо з початку...
thedvoichnik
16.03.2022 03:40
Запись С$3 устанавливается для:Варианты ответа Относительной ссылкиАбсолютной ссылкиСмешанной ссылки...
79025585606
05.05.2021 06:59
Составьте программу вычисления суммы и произведения трех чисел контроша...
БПАНган
28.01.2023 15:43
Скласти алгоритм та написати програму знаходження функції Y:...
insaf1282
02.03.2021 05:10
Как поддерживается постоянство артериального давления крови?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
For a := 1 to 20 do
begin
writeln(a,"^2 = ", a*a);
end
или
a:= 1;
repeat
writeln(a,"^2 = ", a*a);
a := a + 1;
until a > 20;