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

1
Комментарий удален
Можно
сейчас попробую
Комментарий удален
Если найдёте ошибку сообщите

Ответы и объяснения

2014-01-30T14:28:53+00:00
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.
Комментарий удален
не долго, ладно ща кратко
Всё правильно решено. Получила 5.