Предмет: Информатика,
автор: tsimovskaya
Записать программу этого уравнения на языке Паскаль
Приложения:

Ответы
Автор ответа:
0
var omega, k: real;
const b =5; c=3;
begin
writeln ('Введите число омега');
readln(omega);
k := sqrt((sqr(sin(omega))+cos(sqr(omega)))/(b*c/3+3*b*sqr(c)/4));
writeln('k принимает значение ', k:2:2);
end.
const b =5; c=3;
begin
writeln ('Введите число омега');
readln(omega);
k := sqrt((sqr(sin(omega))+cos(sqr(omega)))/(b*c/3+3*b*sqr(c)/4));
writeln('k принимает значение ', k:2:2);
end.
Автор ответа:
0
спасибо
Похожие вопросы
Предмет: Литература,
автор: marktigers90
Предмет: Математика,
автор: parolalexander509
Предмет: География,
автор: lidarozum635
Предмет: Математика,
автор: 1София6
Предмет: Литература,
автор: Азиз11