АС
Анастасия Сущ
Паскаль-задача на массивы
Напишите программу, которая вводит с клавиатуры 15 целых чисел, организовывает их хранение в одномерном массиве, а затем определяет среднее арифметическое элементов массива.
Напишите программу, которая вводит с клавиатуры 15 целых чисел, организовывает их хранение в одномерном массиве, а затем определяет среднее арифметическое элементов массива.
for i:=1 to 15 do begin
write('vvesti ',i,' chislo -->'); readln(a [ i ] ; end;
s:=0;
for i:=1 to 15 do
s:=s+a [ i ] ;
s := s/15;