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

Question

Информатика

Далила

8 ноября, 14:35

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

+5

Ответы (1)

Знаете ответ?

Ярослава · Answer 1

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).