Паскаль (как записать и решать примеры с cos,sin);

Роман Баранов

Задача: Записать выражение cos^2 + x^2 (где cos и x - любые числа).
---в чем ошибка?---
program prm1;
var o,x,grad,cos:real;
begin
writeln ('x=,grad=');
Readln (x,grad);
cos:=Pi/grad;
o:=sqr (cos)+sqr(x);
writeln ('otvet = ',o:3:2);
Readln;
End.

Роман Баранов 6 месяцев назадСпасибо 1
1 чел.