Вопрос, который вызвал трудности

Какую программу написать чтобы найти максимальное из чисел a,b,c ? минимльное из чтырёх чисел?

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «Информатика». Ваш вопрос звучал так:

Какую программу написать чтобы найти максимальное из чисел a,b,c ? минимльное из чтырёх чисел?

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Program abc;
var a, b, c, max: integer;
begin
read (a, b, c);
if a>b then
a:=max
else 
b:=max;
if c>max then
c:=max;
writeln ('Максимальное число__', max);
end. 
Второй в один вопрос еще))0).