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.
Сообщение племени Мульти занимает 4 * 120 = 460 бит (потому что 16 = )
Сообщение племени Пульти занимает 5 * 96 = 480 бит (потому что 32 = )<span>Ответ: сообщение племени Пульти больше сообщения от племени Мульти на 20 бит. </span>