Домашние задание из программирования. Блок схема

Домашние задание из программирования. Блок схема.
Сделать блок схему для данной программы.

var x,y:real; a,b,c,d,v,min,max,ser1,ser2:integer;
begin
writeln('MEH1O':10);
writeln('1 - zadacha 1');
writeln('2 - zadacha 2');
writeln;
write('vvedit nomer zada4i:');
readln(v);
case v of
1:begin
write('vvedit x:');
readln(x);
if (x>3.5) then y:=sin(x)*ln(x) else y:=sqr(cos(x));
writeln('y:=',y:6:2);
end;
2:begin
write('vvedit 4 4usla:');
readln(a,b,c,d);
max:=a;
min:=a;
if (b>max) then max:=b;
if (c>max) then max:=c;
if (d>max) then max:=d;
writeln;
if (bser2) then writeln(max:5, ser1:5, ser2:5, min:5) else
writeln(max:5, ser2:5, ser1:5, min:5);
end;
end;
readln
end.

  • могу по Гост 19.701-90, если вы его проходили, пиши ,могу прислать образец схем