1. Информатика
  2. Даны два действительных

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

Dgj8 Dgj8    1   21.05.2019 22:00    2

Ответы
berekesymbat2002123 berekesymbat2002123  01.10.2020 05:16

var a,b:integer;
begin
writeln('Vvedite a,b?');
readln(a,b);
if a>b then writeln((a+b)*(a+b)) else writeln((a-b)*(a-b));
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Котик1978 Котик1978  05.05.2020 11:45
Номер под­раз­де­ле­ния — целое число от 1 до 1000, он за­пи­сан на про­пус­ке как дво­ич­ное число и за­ни­ма­ет ми­ни­маль­но воз­мож­ное целое число байт (сколько?)​...
milka292 milka292  05.05.2020 11:45
Откуда браузер «знает», как оформлять заголовки и гипер-ссылки?​...
Plushtrap Plushtrap  05.05.2020 11:40
Гиперсілтемеге көмекші сөз қою ретін анықтаңыз...
sirius2010 sirius2010  05.05.2020 11:40
1. MS Word-тың сілтемелер бөлімінде ғылыми еңбектер негізделетін адебиеттер тізімін басқаруға мүмкіндік беретінкуралдар тобы:А) Сілтемелер және әдебиеттер тізіміВ) ТүсіндірмелерC)...
Анабель2032 Анабель2032  05.05.2020 11:40
1. Сколько раз будет выполнен цикл? а) for i:=1 to 10 do k:=k+1 b) for i:=10 to 11 do k:=k+1 c) d:=5; for i:=1+d to 15-d do k:=k+1 d) for i:=-5 to 9 do k:=...
Aldon15 Aldon15  05.05.2020 11:39
Номер под­раз­де­ле­ния — целое число от 1 до 1000, он за­пи­сан на про­пус­ке как дво­ич­ное число и за­ни­ма­ет ми­ни­маль­но воз­мож­ное целое число байт (сколько?)​...
makskos4444 makskos4444  05.05.2020 11:39
Написать программы на Паскале. 1) Дано целое число — цена 1 кг конфет. Вывести стоимость 1, 2, …, 10 кг конфет. 2) Даны два целых числа A и B (A B). Найти сумму всех целых...
tematal tematal  05.05.2020 11:30
нужно решение Учитель проверил контрольные работы трех учеников — Алексеева, Васильева и Сергеева, но после проверки забыл принести их в класс. Ученикам он сказал: «Все вы...
krisdenya2005 krisdenya2005  05.05.2020 11:33
Катя написала программу, привыполнении которой ведущая осьмотора совершает 40 оборотов вминуту.Сколько оборотов в минуту будетделать ведомая ось передачи,которую собрала Катя?В...
zagena09 zagena09  05.05.2020 11:32
Напишите порядок действий создания трехмерного шестиграника в3Dформате...

Популярные вопросы