Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
pixxxiv
25.07.2022 16:07 •
Информатика
4.напечатать столбиком квадраты всех двузначных целых чисел (на языке pascal)
Ответ:
ulianna26
06.10.2020 08:02
Program;
var a,i:integer;
Begin
for i:=10 to 99 do
begin;
readln(a);
a:=a*a;
end;
writeln(a);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
zaycevakatyany
14.08.2022 08:56
Дано 30 натуральных чисел. вычислить среднее арифметическое всех нечетных чисел(паскаль)...
dbuzoverova
10.01.2020 07:02
2. Отметьте правила ,которые следует соблюдать при работе за компьютером : * нельзя сутулиться, напрягаться, ноги и руки должны опираться на поверхность под прямым углом;запрещается...
mtrololo09
25.12.2021 15:30
. Вирус – это… * нарушение работо элемента системы, что приводит к невозможности выполнения им своих функцийнебольшая программа для выполнения определенной задачикод...
qwerty999999fgh
23.01.2021 05:30
Чем отличается имя файла от полного имени файла ? ...
eriknovoselov
02.08.2022 07:20
Язык программирования pascalдано число ch в десятичной системе исчисления. написать программу, которая переводит число в систему исчисления с основанкм m. технічні умови:...
миньён9
20.08.2021 21:05
Удаляются ли вирусы с устройства (на операционной системе андроид) при сбросе настроек до заводских? при условии,что в устройстве не установлена карта памяти? заранее...
ame5
02.07.2022 23:16
1.Обчисліть кількість речовиниводню, взятого об ємом 12 л....
154904
02.07.2022 08:12
Какое расстояние нужно преодолеть, чтобы попасть из России в США? ...
Зефирка170504
15.08.2021 13:07
Сколько вальсов сочинил шопен?...
cat159753jjyfvb
15.08.2021 13:07
Контурная карта по всем. истории: Российская Империя в другой половине 19 в. вопрос: Обведите коричневой линией границы Российской империи в 1900 году...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,i:integer;
Begin
for i:=10 to 99 do
begin;
readln(a);
a:=a*a;
end;
writeln(a);
End.