Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
smail520
13.09.2021 01:02 •
Информатика
Задана сторона а1 первого квадрата и сторона другого квадрата а2. площадь какого квадрата больше?
Показать ответ
Ответ:
Mrenderstail288
09.09.2020 06:58
Var
a1,a2:integer;
begin
writeln('Введите а1');
read(a1);
writeln('Введите а2');
read(a2);
a1:=sqr(a1);
a2:=sqr(a2);
if a1>a2 then
writeln('Площадь а1 больше')
else
writeln('Площадь а2 больше');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vadim1154
16.05.2020 03:33
Составить программу вычисления сумм от 1 го до n...
pe4enel
16.05.2020 03:33
Даны два действительных положительных числа x и y. арифметические действия над числами пронумерованы (1 – сложение, 2 – вычитание, 3 – умножение, 4 – деление). составьте...
Вероникалобова
16.05.2020 03:33
Пример алгоритма с использованием неполной формы ветвления....
Joker5855
03.02.2021 11:50
По ! начинающий программист написал такую программу на языке pascal: vara, b, c: longint; begin readln(a, b, c); a : = b; b : = c; c : = a; writeln(a, , b, , c); end. после...
Moew
10.11.2020 13:31
Желательно расписать все 20б...
sasha23z
20.05.2021 15:01
Соотнесите видовременные формы глагола и их название. 1. подлеж. + v, vs a. present continuous tense 2. подлеж. + ved, v2 b. future simple tense 3. подлеж. + will + v c....
fox2121
20.05.2021 15:01
Растаял в поле снег,леса повеселели. даль заливных лугов лазурна и ясна; стыдливо белая береза зеленеет, проходят облака всё выше и нежней, а ветер сушит сад и мягко в окна...
antuarmenskaya
20.05.2021 15:01
Кчему относится слово зиккурат к персидской державе? ,к древней греции? ,к древнему риму? ,к шумерским -государствам? ....
Маис555
20.05.2021 15:01
Длина окружности равна 94,2 найдите её радиус число пи 3,14...
SASHA23103
20.05.2021 15:01
Подчеркнуть твердые согласные синим цветом, а мягкие зеленым. однажды в степи встретились лиса и волк. лиса сильно испугалась...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a1,a2:integer;
begin
writeln('Введите а1');
read(a1);
writeln('Введите а2');
read(a2);
a1:=sqr(a1);
a2:=sqr(a2);
if a1>a2 then
writeln('Площадь а1 больше')
else
writeln('Площадь а2 больше');
end.