составить блок схему по программе 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.
Блок Схема,в jpeg формате (Картинка ) сделана в Word 2007.У вас Ошибка составление программы (var max,x,e:real;) [хотя вы запрашиваете x,y]
Картинка загружаться не хочет =),на сайт.
Дам зеркало
http://s018.radikal.ru/i504/1202/b4/cce538bc783b.jpg