ДЗ. Алгоритмы действий над элементами двумерного массива
Задача 1. В течение недели измерялась температура три раза в день: утром, в обед и вечером. Показания записали в таблицу размерностью 7х3. Определить среднюю температуру за каждый день.
Решите в паскале пожалуйста!
СРОЧНО!
Answers & Comments
Verified answer
Var a: array[1..7, 1..3] of integer; s, i, j: integer;begin for i:=1 to 7 do for j:=1 to 3 do readln (a[i, j]); for i:=1 to 7 do begin s:=0; for j:=1 to 3 do s:=s+a[i,j]; writeln('Средняя температура для дня №', i, ' равна ', s/3); end;end.Verified answer
Vara: array[1..7, 1..3] of integer;
s, i, j: integer;
begin
for i := 1 to 7 do
for j := 1 to 3 do
a[i, j] := random(100);
for i := 1 to 7 do
begin
s := 0;
for j := 1 to 3 do
s := s + a[i, j];
writeln('День - ', i, ', Средняя температура = ', (s / 3):2:2, ' гр.');
end;
end.