СРОЧНО!ГИКИ ПОМОГИТЕ, напишите программы в письменном виде(паскаль)

0 голосов
78 просмотров

СРОЧНО!ГИКИ ПОМОГИТЕ, напишите программы в письменном виде(паскаль)


image

Информатика Начинающий (299 баллов)
Дан 1 ответ
0 голосов
Начинающий (855 баллов)
 
Правильный ответ

A)
var p,x,y:real;
begin
readln (x,y);
p:=(x*sin(x))/y;
writeln (p);
end.

b)
 var z,x,y:real;
begin
readln (x,y);
z:=sqr(sin(x+y))/sqr(x+y);
writeln (z);
end.

c)
var z,x,y:real;
begin
readln (x,y);
z:=(x*x*x+y*y)/(y*sin(x));
writeln (z);
end.

d)
var p,x,y:real;
begin
readln (x,y);
p:=2*sin(x*x+y*y)/cos(x*x+y*y);       // tg(a)=sin(a)/cos(a)
writeln (p);
end.

оставил комментарий Начинающий (299 баллов)

СПАСИБР БОЛЬШОЕ!

...