Регистрация
Bogdasha06102015
15.01.2022 14:16
Информатика
Есть ответ 👍

Помгие составить программу нахождения и вывода на экран наибольшего из двух целых чисел.

198
416
Посмотреть ответы 2

Ответы на вопрос:

annafilimonova1
annafilimonova1
4,7(99 оценок)
//pascalabc.net //naaman var       a, b, res : integer; begin       write('введите числа а и b: ');       readln(a, b);       res : = a;       if (b > a) then res : = b;       writeln('максимальное из них - ', res); end.
ОляОля123456789
ОляОля123456789
4,7(49 оценок)

ответ:

begin

  var (x, y) : = readreal2();

  var a : = (x> =0) and (y> =0) and (y < = -x/5 + 1);

  var b : = (x< =0) and (y< =0) and (y > = -x/5 - 1);

  var c : = (x*x + y*y < = 1) and (x > 0) and (y < 0);

  var d : = (x*x + y*y < = 1) and (x < 0) and (y > 0);

  print(a or b or c or d);

end.

объяснение:

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