Question

напишите программу нахождения наибольшего значение среди трёх величин A B C
30баллов
спасибо​

Answer 1

Ответ:

program qq

;var

a, b, c, max: longint;

begin

readln(a, b, c);

max:=a;

if b > max then max:=b;

if c > max then max:=c;

writeln(max);

readln;

end.

Объяснение:

Answer 2

## // PascalАВС.NЕТ версия 3.9

var (a, b, c) := ReadReal3('Ввведи три числа, разделенные пробелами:');

Print('Максимум:', Max(a, b, c))