составить блок схему по программе pascal program zadacha 3_1. var max,x,e:real; begin writeln('введите натуральное число x');readln(x); writeln('введите число y');readln(y); if x>y then max:=x else max:=y; writeln('большее из двух =',max); end.