программа для нахождения наименьшего и наибольшего из трех чисел в паскале

Question

Информатика

Рона

24 сентября, 02:12

программа для нахождения наименьшего и наибольшего из трех чисел в паскале

+4

Ответы (1)

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

Геннадия · Answer 1

Program Pr1;

uses crt;

var a, b, c, max:integer;

begin

clrscr;

readln (a, b, c) ;

if a>b then max:=a

else max:=b;

if c>max then max:=c;

writeln (max) ;

end.