Program u4_1; Var x , y : integer ; Описываем используемые переменные Begin writeln(‘Введите 2 числа ‘); На экран выводим поясняющую надпись «Введите 2 числа» readln ( x , y ); вводим два целых числа через пробел if x>y then writeln (x) если х больше y, то выводим х else writeln ( y ); иначе выводим y End.1. Измените программу u 4_1 для нахождения большего из трех чисел.

Ответы:
Коля СмолярчукПотоцькый
06-04-2015 20:40

Var x , y , z : integer ;beginwriteln(‘Введите 3 числа ‘);readln ( x , y , z );if x>y then beginif x>z then writeln (x) else writeln (z) endelse beginif y>z then writeln (y) else writeln (z) end;readln;End.

Также наши пользователи интересуются:

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Program u4_1; Var x , y : integer ; Описываем используемые переменные Begin writeln(‘Введите 2 числа ‘); На экран выводим поясняющую надпись «Введите 2 числа» readln ( x , y ); вводим два целых числа через пробел if x>y then writeln (x) если х больше y, то выводим х else writeln ( y ); иначе выводим y End.1. Измените программу u 4_1 для нахождения большего из трех чисел.» от пользователя Далия Коврижных в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!