Составить схему алгоритма и написать программу вычисления функции U = f(x, в, z) при заданных значениях x, y, z. Результаты вычислений вывести в соответствии с форматами, отмеченными в варианте задания.Форматы вывода: u — стандартный; в — ширина поля 17 точность 6;x — ширина поля 10; z — стандартный — Pascal(Паскаль)

uses crt;
   var
   x,y,z,F,u:real;
   begin
   clrscr;
      x:=2.3156; y:=-1.3785; Z:=0.578;
Writeln(' x=',x:10,' y=':12,y:17:6,' z= ',z);
Write('U=(1+sqr(sin(x+y)))/(2+abs((x-2*x)/(1+sqr(x)*sqr(y))))/(sqr(cos(sin(1/z))))');
Writeln;
 U:=(1+sqr(sin(x+y)))/(2+abs((x-2*x)/(1+sqr(x)*sqr(y))))/(sqr(cos(sin(1/z))));
 
 Writeln('U= ',u);
 readln;
 end.

Leave a Comment

+ 61 = 62