Нид хелп с Паскалем, ребяты. Не тяну эту хрень вообще ни разу. В общем, нужно сделать программы по данному алгоритму: Y = Сигма, наверху n=10, внизу i=3, /i/
Нид хелп с Паскалем, ребяты. Не тяну эту хрень вообще ни разу. В общем, нужно сделать программы по данному алгоритму: Y = Сигма, наверху n=10, внизу i=3, /i/
Гость
Ответ(ы) на вопрос:
ГостьПомог отметь как лучший ответ! uses crt;
var k,n,i,p,sum : integer;
function f(n:integer):integer;
begin
f:=(abs(n));
end;
begin
writeln ('vvedite konechnui index') ;
readln(p);
sum:=0;
for k:=1 to p do
sum:=sum+f(k);
writeln(sum);
readln;
end.
Не нашли ответ?
Похожие вопросы