Составьте программу вычисления суммы

@Михаил8888 · Регистрация: 04.05.2017

Составьте программу вычисления суммы
Название: Безымянный.png
Просмотров: 21

Размер: 1.1 Кб

@Puporev · 04.12.2017, 18:27

Pascal

1
2
3

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

@Михаил8888 · 05.12.2017, 16:37 **[ТС]**

не получается( у вас abc. net?

@Puporev · 05.12.2017, 16:41

Да хоть какой Паскаль, просто нужно написать программу, а не только алгоритм.

@eaa · 05.12.2017, 19:15

Pascal

1
2
3

begin
  Write(SeqGen(ReadInteger('Введите N:'), i -> 1 / (i + 1).Sqr).Sum);
end.

@Михаил8888 0 / 0 / 0 Регистрация: 04.05.2017 Сообщений: 58
		1
	Составьте программу вычисления суммы 04.12.2017, 15:43. Показов 539. Ответов 4 Метки нет (Все метки) Составьте программу вычисления суммы 0

@Михаил8888 0 / 0 / 0 Регистрация: 04.05.2017 Сообщений: 58
	05.12.2017, 16:37 [ТС]	3
	не получается( у вас abc. net? 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	05.12.2017, 16:41	4
	Да хоть какой Паскаль, просто нужно написать программу, а не только алгоритм. 0

	05.12.2017, 19:15