Написать программу вычисления суммы используя оператор цикла

@~Angelok~ · Регистрация: 12.12.2010

Студворк — интернет-сервис помощи студентам

Написать программу вычисления суммы используя оператор цикла:

$https://www.cyberforum.ru/cgi-bin/latex.cgi?S = \sum_{i=1}^{N}\frac{{i}^{2}}{a-2}$

Извиняюсь за несколько сообщений!!!но вот теперь, всё получилась формула!

@SuPeR XaKer · 12.12.2010, 19:51

Pascal

sum:=0;
for i:=1 to n do
begin
 sum:=sum+(sqr(i)/(a-2));
end;

@~Angelok~ · 12.12.2010, 20:27 **[ТС]**

а вы можете расписать всю программу поподробней.я не особо разбираюсь,буду очень признательна.

@SuPeR XaKer · 12.12.2010, 20:31

две строки не в состоянии дописать?

Pascal

uses
 crt;
var
 i,n:integer;
 sum,a:real;
begin
Clrscr;
repeat
 readln(n,a);
until a<>2;
sum:=0;
for i:=1 to n do
begin
 sum:=sum+(sqr(i)/(a-2));
end;
writeln('SUM:=',sum);
readkey
end.

@~Angelok~ 0 / 0 / 0 Регистрация: 12.12.2010 Сообщений: 40
		1
	Написать программу вычисления суммы используя оператор цикла 12.12.2010, 19:49. Показов 4552. Ответов 3 Метки нет (Все метки) Написать программу вычисления суммы используя оператор цикла: $https://www.cyberforum.ru/cgi-bin/latex.cgi?S = \sum_{i=1}^{N}\frac{{i}^{2}}{a-2}$ Извиняюсь за несколько сообщений!!!но вот теперь, всё получилась формула! 0

@~Angelok~ 0 / 0 / 0 Регистрация: 12.12.2010 Сообщений: 40
	12.12.2010, 20:27 [ТС]	3
	а вы можете расписать всю программу поподробней.я не особо разбираюсь,буду очень признательна. 0

Опции темы