Составить блок схему по программе 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