Есть ответ 👍

Склавиатуры вводится 10 чисел найти среднее арифметическое этих чисел. паскаль

258
353
Посмотреть ответы 2

Ответы на вопрос:

helsey
4,5(74 оценок)

Var a: array[1..10] of integer; i,k: integer; s: real; begin k: =0; writeln('введите числа'); for i: =1 to 10 do begin readln(a[i]); k: =k+a[i]; end; s: =k/10; writeln('среднее арифметическое равняется ',s); end.
MSZaDrotE
4,5(22 оценок)

зделай лучшим

Объяснение:

Популярно: Информатика