Информация о количестве жильцов в каждой из четырех квартир каждого этажа 12-этажного дома хранится в двумерном массиве (в первой строке - информация о квартирах первого этажа, во второй - второго и т. д.). В каждой квартире проживает одна семья. Найти численность самой большой семьи в квартирах 3-го и 4-го этажей. (Pascal)

Question

Информатика

Дебора

18 сентября, 19:10

Информация о количестве жильцов в каждой из четырех квартир каждого этажа 12-этажного дома хранится в двумерном массиве (в первой строке - информация о квартирах первого этажа, во второй - второго и т. д.). В каждой квартире проживает одна семья. Найти численность самой большой семьи в квартирах 3-го и 4-го этажей. (Pascal)

+2

Ответы (1)

Знаете ответ на вопрос?

Капик · Answer 1

Var

a : array [1 ... 12, 1 ... 4] of integer;

i, j, max : integer;

begin

for i : = 1 to 12 do

for j : = 1 to 4 do

read (a[i, j]) ;

max : = a[3, 1];

for i : = 3 to 4 do

for j : = 1 to 4 do

if a[i, j] > max then max : = a[i, j];

write (max) ;

end.