Дан массив из 5 элементов

Question

Дан массив из 5 элементов. Найти средне арифметическое всех элементов массива.

Answer 1

44

aleksel

23 февраля 2023

Program ArrayAverage; var a: Array [1… 5] of Integer; i: Integer; b: Real; Beginb: =0; WriteLn ('Введите 5 целых чисел через пробел и нажмите Enter'); For i: =0 To 4 DoBeginRead (a[i]); End; For i: =0 To 4 DoBeginb: =b+a[i]; End; b: =b / 5; Write ('Среднее арифметичиское: '); WriteLn (b: 10:2); End.

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

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

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

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: