type ocenka=1..5; var a: array [1..12] of ocenka; i:integer; s: real; begin s:=0; for i:=1 to 12 do begin readln(a[i]); s:=s+a[i]; end; writeln(s/12:0:3); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
