Составить программу для вычисления и блок-схему! Пожалуйста! См. во вложении!

Составить программу для вычисления и блок-схему! Пожалуйста! См. во вложении!

Задать свой вопрос
1 ответ
Var x,y,f,z:real;
begin
write('x='); readln(x);
write('y='); readln(y);
if x*ylt;1/2
 then f:=(1+cos(y-x))/(x/y+y*y)
 else f:=sin(ln(абс(x/y)));
z:=cos(f)*cos(f)*cos(f);
writeln('f=',f);
writeln('z=',z);
end.

Блок-схема - в прилагаемом файле.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт