Написать программу паскаль!

Question

Написать программу паскаль! Дан массив из 20 целых чисел, определить среднее арифметическое этогомассива

Answer 1

46

leonelli

02 марта 2023

Var a: array [1… 20] of integer; i,s: integer; BeginFor i: =1 to 20 do begin read (a[i]); s: =s+a[i]; end; Writeln (s/20); readln; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить