Ответы
Ответ дал:
0
Program element_massiva5
var
Sum, i : integer;
a : array [1..15] of integer;
begin
Sum := 0;
writeln('введите 15 чисел массива');
for i:=1 to 15 do
begin
readln(a[i]);
end;
Sum:=a[1]+a[2]+a[3]+a[4]+a[5];
Writeln(' Ответ: ',Sum);
end.
var
Sum, i : integer;
a : array [1..15] of integer;
begin
Sum := 0;
writeln('введите 15 чисел массива');
for i:=1 to 15 do
begin
readln(a[i]);
end;
Sum:=a[1]+a[2]+a[3]+a[4]+a[5];
Writeln(' Ответ: ',Sum);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад