В двумерном массиве хранится информация о зарплате 20 человек за каж- дый месяц года...

Question

В двумерном массиве хранится информация о зарплате 20 человек за каж- дый месяц года (первого человека — в первой строке, второго — во вто- рой и т. д.). Составить программу для расчета общей зарплаты, полученной за год любым человеком, информация о зарплате которого представлена в массиве.

Answer 1

Var a:array[1..12,1..20] of real;
  i,j,n:integer;
  s:real;
begin
// Заполним массив случайными значениями для теста
for i:=1 to 12 do
  for j:=1 to 20 do
    a[i,j]:=random*20000;
    
writeln('Номер сотрудника ');
readln(n);
for i:=1 to 12 do
  s:=s+a[i,n];
writeln('Зарплата за год ',s);
end.

Comments

большое Спасибо!

Answer 2

Паскаля нет под рукой, но я себе это представляю как-то так...

---