Введите с клавиатуры 4 числа. вывести на экран номер наибольшего числа. это по паскалю.

denver87 denver87    3   31.05.2019 05:50    0

Ответы
666Luc666 666Luc666  01.07.2020 16:43
Program z1;
var a, b, c, d, max: integer;

begin

writeln('Введите 4 числа');
reag(a,b,c,d);
     if a>b then max:=a
                else max:=b;
     if c>max then max:=c
           else max:=max+0;     {чтоб max не изменилось}
     if d>max then max:=d
           else max:=max+0;      {тож самое - без изменений}
writeln('Максимальное число', max);
end.
Введите с клавиатуры 4 числа. вывести на экран номер наибольшего числа. это по паскалю.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика