Grinius
4 год назад
Пожалуйста посчитайте решить то, что на фото
ОТВЕТЫ
Илья
Oct 24, 2020
Крч, Паскаль, вот код:
var a:array[1..7] of longint;i,k:longint;begin for i:=1 to 7 do read(a[i]); k:=0; for i:=1 to 7 do k:=k+a[i]; writeln(k/7:0:2)end.
var a:array[1..7] of longint;i,k:longint;begin for i:=1 to 7 do read(a[i]); k:=0; for i:=1 to 7 do k:=k+a[i]; writeln(k/7:0:2)end.
105
Смежные вопросы:
