Question

Определить максимальное и минимальное значение из трех различных вещественных чисел.
работа на поскале

Answer 1

var A, B, C, MAX: real;
begin
MAX:=a;
if b > max then max:=b;
if C > max then max:=c;
end;

Примерно так

Answer 2

да это она спс паскаль не ругается

Answer 3

немного ошибся)