Помогите составить блок схему к этому коду,пожалуйста. - вопрос №2256973

program lab9;
Var a,b,x:integer;
z1,z2:real;
p,v,y:integer;
Procedure menu;
Begin
Writeln(введите a,b');
Readln(a,b);
Writeln('введите y');
Readln(y);
Writeln(введите p? v');
Readln(p,v);
End;
Function fun1(x:integer):real;
begin
fun1:=sqrt+(1+sqr(x));

end;
Function fun2(p,v:integer):longint;
begin
fun2:=p*p+v*v;
end;
begin
menu;
z1:=ln(1+a*fun(x))/(b*fun(x));
Writeln('z1=',z1:2:2);
z2:=(1+x*x+y*y)/(3+sqrt(x*x+y*y));
Writeln('z2=',z2:2:2);
Readln;
end.
Ответов пока нет

Еva

от 100 p.
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store