Предмет: Информатика,
автор: RafGraff
Помогите решить информатику pascal a b x
Задание 8
Приложения:
![](https://files.topotvet.com/i/863/863cb8362b5acb9d55ad8d785b51d526.jpg)
Ответы
Автор ответа:
1
var y,a,b:real;
x:integer;
begin
writeln('Введите значения переменных');
writeln('a= '); readln(a);
writeln('b= '); readln(b);
writeln('x= '); readln(x);
y:=sqrt((a+b)/(1-cos(3.6*x)))+3.95;
writeln('y= ',y);
end.
Похожие вопросы
Предмет: Математика,
автор: artemnam2018
Предмет: Математика,
автор: hamzat44
Предмет: Литература,
автор: tnastoyachay
Предмет: История,
автор: ХарлиКвинн666
Предмет: Алгебра,
автор: kezzyhko