Определить среднюю оценку пятого ученика

@Redfelt · Регистрация: 28.02.2017

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

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

@Hitoku · 01.03.2017, 00:27

Pascal

uses crt;
var
A:array [1..20,1..10] of integer;
sum:real;
i,j:integer;
begin
  clrscr;
  randomize;
  sum:=0;
  for i:=1 to 20 do
    for j:=1 to 10 do
      A[i,j]:=random(4)+2;
  for i:=1 to 20 do begin
    writeln;
    for j:=1 to 10 do
      write(A[i,j],' ');
  end;
  for j:=1 to 10 do
    sum:=sum+A[5,j];
  writeln;
  writeln('Sredneye arifmeticheskoye = ',sum/10:0:0);
  readln;
end.

@Redfelt 0 / 0 / 0 Регистрация: 28.02.2017 Сообщений: 4
		1
	Определить среднюю оценку пятого ученика 28.02.2017, 23:14. Показов 1497. Ответов 1 Метки нет (Все метки) В двумерном массиве хранится информация об оценках каждого из 20 учеников класса по тому или иному предмету(в первой строке - информация об оценках первого ученика, во второй - второго). Общее число предметов равно 10. Определить среднюю оценку пятого ученика. 0

	01.03.2017, 00:27

Определить среднюю оценку пятого ученика

Решение