Напишите программу, которая вычисляет сумму первых n членов ряда

@Dredd1we · Регистрация: 25.02.2014

@Puporev · 25.02.2014, 16:37

Pascal

1
2
3

s:=0;
for i:=1 to n do
s:=s+1/(i*i);

@ertay-98 · 25.02.2014, 17:23

Сообщение от Dredd1we

Напишите программу, которая вычисляет сумму первых n членов ряда
Изображения

вот один из примеров:

Pascal

Program p;
var i,n:integer;
s:real;
begin
s:=0;
writeln('введите  N');
readln(n);
for i:=1 to n do s:=s+1/(i*i);
writeln(s);
end.

Добавлено через 5 минут

Сообщение от Dredd1we

Напишите программу, которая вычисляет сумму первых n членов ряда

вот другой пример реализации:

Pascal

Program p;
var i,n:integer;
s:real;
begin
s:=0;
i:=1;
writeln('Введите N');
readln(n);
repeat
s:=s+1/(i*i);
I:=i+1;
until i>n;
writeln(s);
end.

@Dredd1we 0 / 0 / 0 Регистрация: 25.02.2014 Сообщений: 5
		1
	Напишите программу, которая вычисляет сумму первых n членов ряда 25.02.2014, 15:52. Показов 1606. Ответов 2 Метки нет (Все метки) Напишите программу, которая вычисляет сумму первых n членов ряда Изображения 0

Опции темы

Решение