logo
Войти Регистрация Спроси ai-bota


vika24rus25
04.04.2022 07:56

Склавиатуры вводится 2 числа,требуется найти квадрат наименьшего из них.

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
feitlol
feitlol
23.07.2020 23:22
40 ! 1) визуальную информацию несет: 1.схема метро. 2. жужжание пчелы. 3. вкус конфеты. 4. запах розы. 2) информацию, изложенную на доступном для получателя языке, 1.понятной. 2....
mintella2442
mintella2442
01.11.2021 17:30
1.скорость передачи данных через adsl-модем равна 256кбит.спередача данных занимает 24мин.определить обьем фаила в мегабитах? 2.размеры растрового графического зображения равно 1024х800...
fgsjjhw
fgsjjhw
06.02.2021 07:01
Расшифровать код 11010001 10001111 11010000 10111110 11010001 10001000 11010000 10110101 11010000 10111101 11010001 10001100 11010001 10000001 11010000 10111000 11010000 10111011...
Zhanar161
Zhanar161
06.02.2021 07:01
Какие виды запросов могут использоваться в субд ms access?...
dimitiy02
dimitiy02
06.02.2021 07:01
ответьте на вопрос по информатике! только верно! за выполнение 20 . укажите, какие из перечисленных групп устройств относятся к внешней памяти компьютера? 1. монитор,дискета, мышь....
dasha190800
dasha190800
28.11.2020 05:20
Объясните что означает термин полная информация пример полной информации​...
ivan1и2в3а4н5
ivan1и2в3а4н5
29.01.2023 12:05
Необходимо перевести робота из начального положения (0) в точку а, закрашивая при этом указанные клетки поля. размеры стен и расстояние между ними могут быть произвольны.​, !...
1Yuki2
1Yuki2
16.09.2020 16:15
Дан целочисленный массив из 30 элементов. элементы массива могут принимать любые целые значения. напишите программу, которая находит и выводит номер элемента массива, наименее отличающегося...
lao1205
lao1205
09.05.2021 18:12
Оператор вывода write (3,13,29,200...
jokeaaaaff
jokeaaaaff
05.04.2023 09:49
1. В чем преимущества и недостатки внутристраничных,внутрисистемных и межсистемных гиперссылок?2. Изучите дополнительные материалы, определите сходствои различие внутрисистемной и...
Ответ:
Romakot
17.07.2020 10:55
Var a1,b1,a,b:integer;
begin
readln(a,b);
a1:=sqr(a);
b1:=sqr(b);
if (b1>a1)
then write(a1)
else write(b1)
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота