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

Даны два числа x и у, большее из них возвести в квадрат

Ответ:

kvpopochku

09.07.2020 18:47

Var
a,b,max:Integer;
Read(a,b);
if (a>b) then max:=a*a
else if (b>a) then max:=b*b;
Writeln(max);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Nemiroffdenisa

07.07.2022 04:07

Дан фрагмент блок-схемы алгоритма чему равно значение b после завершения цикла ...

Fdcsxdxdvrcfcr

17.03.2022 22:44

В ячейке E4 записана формула =$А2+C$3. Её скопировали в ячейку F6. Какой вид будет иметь формула в ячейке F6?...

DementоR

03.07.2021 09:35

Определите значения переменной b после выполнения фрагмента алгоритма . Очень нужно ...

niga24

03.04.2020 22:52

По 10 примеров фактов и правил из области информатика факты: я знаю что правила я знаю 100...

Tomokl

03.04.2020 22:52

1.составьте два сложных высказывания, одно из которых в любой ситуации всегда будет ложным, а другое истинным. а = на улице светит солнце, в = на улице дождь, с = на улице...

аноним12345567808

03.04.2020 22:52

Задано пятизначное число.найдите цифры и сумму цифр пятизначного числа. (программа на паскале) div и mod...

mashyanova

25.10.2021 15:48

Написать программу для нахождения произведения от m до n....

Пвлчлчпс

12.04.2023 20:08

Ккорню приклей суфикс, к суфиксу окончание так что бы получильсь слова + оньк + ого = +чн+ая = +ник= =...

1615005296

12.04.2023 20:08

Пропускная некоторого канала связи равна 128 000 бит/с. сколько времени займёт передача файла объёмом 500 кбайт по этому каналу?...

themaximka41

18.09.2021 01:27

Переведите целые числа из десятичной системы счисления в шестнадцатеричную: 519 2954...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку