Вычислить значение функции y. Значение x задать произвольно.
Составить блок схему и написать в Паскаль
Приложения:
![](https://st.uroker.com/files/d72/d72def576cc4b0d27c0710c9d30f3c40.png)
Ответы
Ответ дал:
0
Ответ:
//fpc 3.0.0
program HelloWorld;
var t, k: Integer;
var x, sum, p: Real;
begin
write('Введите x: ');
readln(x);
sum := 0;
p := 1;
for t := 1 to 7 do
sum := sum + Sin(t*x) / (1.0 * t * t);
for k := 1 to 9 do
p := p * Sqrt(1.0 * k);
writeln(sum + p);
end.
Приложения:
![](https://st.uroker.com/files/721/721aa5d12aa60009e867c9f32156702f.png)
Ответ дал:
0
Спасибо большое!!!!
Вас заинтересует
1 год назад
2 года назад
2 года назад
7 лет назад
8 лет назад