Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
pakapika
27.02.2023 20:13 •
Информатика
Найдите квадрат наибольшего из чисел a и b. выведите результат сравнения на экран. программу напишите на языке программирования паскаль
Показать ответ
Ответ:
tim228904
04.10.2020 11:49
Var a,b:integer;
begin
writeln('Введите два числа:');
readln(a,b);
if (a>b)
then writeln(a,' > ',b,', ',a,'^2=',a*a)
else writeln(b,' > ',a,', ',b,'^2=',b*b);
end.
Пример:
Введите два числа:
5 8
8 > 5, 8^2=64
0,0
(0 оценок)
Популярные вопросы: Информатика
Catania2
22.06.2021 13:12
За этот во ты получишь Дана блок-схема. Какое значение будет иметь z на выходе, если x=49?...
anettaaa1
02.05.2022 02:34
Переведи число 10368 в десятичную систему счисления....
namazovaainur
22.06.2022 22:43
Напишите памятку на тему Правила тестирования программы ...
Aleksandr31821
21.06.2022 23:23
решить тест по информатике...
turkeev90
31.03.2021 07:47
Смешано v1 литров воды температуры t1 с v2 литрами воды температуры t2. Найти объем и температуру образовавшейся жидкости...
xvukvkee
26.09.2020 10:44
Приведенные словосочетания получены из выражений, в которых слова заменены на противоположные по смыслу. Например: ты тупой-ты умный. 1)Коллективные счёты 2)Отцовский...
nika99560
29.12.2021 14:11
Нужен курсач на тему спеціалізований арифметично-логічний пристрій для виконання додавання ,будьте добры,...
kotdv75
10.06.2021 12:50
Составить программу которая выводит на экран бегущую строку справо на лево с любым текстом....
Kakazabra
19.11.2020 19:25
Середня лінія трикутника дорівнює 6.7см. знайти основу трикутника паралельну середній лінії...
zaporozkayaoks
25.01.2023 02:49
1.(15 ) назовите время и место возникновения, священную книгу и проповедника ислама. перечислите 5 главных культовых обязанностей мусульманина, предписанных исламом....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Введите два числа:');
readln(a,b);
if (a>b)
then writeln(a,' > ',b,', ',a,'^2=',a*a)
else writeln(b,' > ',a,', ',b,'^2=',b*b);
end.
Пример:
Введите два числа:
5 8
8 > 5, 8^2=64