Написать программу в паскале которая выводит на экран сумму первых n целых чисел. количество суммируемых чисел должно вводиться во время работы программы

Question

Информатика

Элладий

1 июня, 16:21

Написать программу в паскале которая выводит на экран сумму первых n целых чисел. количество суммируемых чисел должно вводиться во время работы программы

+1

Ответы (1)

Знаете ответ на вопрос?

Марка · Answer 1

Uses crt;

var

a:array [1 ... 255] of byte;

i, n, j:integer;

begin

for i:=1 to 255 do

begin

a[i]:=random (100) ;

write (a[i]," ") ;

end;

write ("сколько чисел складывать:") ;

read (n) ;

for i:=1 to n do

begin

j:=J+a[i];

end;

writeln (j) ;

readln;

end.