Предмет: Информатика,
автор: BIKENEADIKVATNIY
составить программу , фотографии в помощь
99 БАЛЛОВ
Приложения:
Ответы
Автор ответа:
0
var
a:array[1..5,1..3] of integer;
s,i,j:integer;
begin
for i:=1 to 5 do
for j:=1 to 3 do read(a[i,j]);
s:=0;
for i:=1 to 5 do
for j:=1 to 3 do s:=s+a[i,j];
writeln('s = ',s);
end.
Пример:
5 8 4
3 0 9
1 7 6
2 6 8
7 3 1
s = 70
a:array[1..5,1..3] of integer;
s,i,j:integer;
begin
for i:=1 to 5 do
for j:=1 to 3 do read(a[i,j]);
s:=0;
for i:=1 to 5 do
for j:=1 to 3 do s:=s+a[i,j];
writeln('s = ',s);
end.
Пример:
5 8 4
3 0 9
1 7 6
2 6 8
7 3 1
s = 70
Похожие вопросы
Предмет: Математика,
автор: Shatlana82
Предмет: Русский язык,
автор: Sergep24
Предмет: Английский язык,
автор: Alinaing12345
Предмет: Математика,
автор: nikita15d
Предмет: Литература,
автор: Диана559