Предмет: Информатика,
автор: Noname111144
Необходимо составить программу на языке Pascal.
Задание: найти сумму чисел.
Формула, по которой составлять:
S = x+x/4-x/9+x/16+x/25...+x/100
juliaivanovafeo:
Плюс и минус не чередуются? Может вместо минуса плюс?
Ответы
Автор ответа:
0
Ответ:
В объяснении
Объяснение:
program summa;
var sum:real;
k, x:integer;
begin
writeln('ВВедите x');
readln(x);
sum:=0;
k:=2;
while k<=10 do
begin
sum:=sum+x/(k*k);
k:=k+1;
end;
writeln('Сумма=', sum:2:3);
readln;
end.
Похожие вопросы
Предмет: Русский язык,
автор: 89803497883
Предмет: Другие предметы,
автор: Наташка912
Предмет: Русский язык,
автор: bitkovan
Предмет: История,
автор: Римлян113
Предмет: История,
автор: Аноним