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

@SdibS · Регистрация: 28.02.2011

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

Помогите написать программу, которая вводит по строкам с клавиатуры двумерный массив и вычисляет сумму его элементов по столбцам...

@bogdanustimov · 26.03.2011, 14:58

Pascal

Uses CRT;
var s:real;
i,e,a,q:integer;
B:array[1..50,1..50] of real;
begin
clrscr;
writeln('RAZMER:');
readln(a,q);
Writeln('Vvedite elementu:');
for i:= 1 to a do 
for e:= 1 to q do
writeln('Vvedite element nomer: B[',i,e,']');
readln(B[i,e]);
s:=0;
for i:= 1 to a do begin
for e:= 1 to q do s:=s+B[i,e];
wrieln('SYMA i-ogo stolbca:',s);
s:=0;
end;
readln;
end.

Добавлено через 23 часа 0 минут
Опечаталса...

Pascal

Uses CRT;
var s:real;
i,e,a,q:integer;
B:array[1..50,1..50] of real;
begin
clrscr;
writeln('RAZMER:');
readln(a,q);
Writeln('Vvedite elementu:');
for i:= 1 to a do 
for e:= 1 to q do
writeln('Vvedite element nomer: B[',i,e,']');
readln(B[i,e]);
s:=0;
for i:= 1 to a do begin
for e:= 1 to q do s:=s+B[i,e];
wrieln('SYMA ',i,'-ogo stolbca:',s);
s:=0;
end;
readln;
end.

@ваааадим · 23.12.2013, 07:17

апцуа

@SdibS 0 / 0 / 0 Регистрация: 28.02.2011 Сообщений: 4
		1
	Написать программу, которая вводит по строкам с клавиатуры двумерный массив и вычисляет сумму его элементов по столбцам 25.03.2011, 15:20. Показов 9688. Ответов 2 Метки нет (Все метки) Помогите написать программу, которая вводит по строкам с клавиатуры двумерный массив и вычисляет сумму его элементов по столбцам... 0

@ваааадим 0 / 0 / 0 Регистрация: 06.12.2013 Сообщений: 6
	23.12.2013, 07:17	3
	апцуа 0

Опции темы

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

Решение