Вафля
-
Автор темы
- #1
задача номер 5:
вот что я наклепал, но это не работает, надеюсь вы справитесь!
Program fff;
var
x:integer;
a,b,c,y:real;
begin
Writeln('Введите значение х');
Readln(x);
a:=(x*x)/2;
b:=cos ((5)*sqrt (x));
c:=1.2*(abs (x*3-4));
y:=4*exp*a-b/c
end.
вот что я наклепал, но это не работает, надеюсь вы справитесь!
Program fff;
var
x:integer;
a,b,c,y:real;
begin
Writeln('Введите значение х');
Readln(x);
a:=(x*x)/2;
b:=cos ((5)*sqrt (x));
c:=1.2*(abs (x*3-4));
y:=4*exp*a-b/c
end.