"найти среднее арифметическое массива из 5 целых чисел."

Сашуля141 Сашуля141    2   31.03.2019 10:30    0

Ответы
keckush keckush  27.05.2020 21:47

var

 x,S:Extended;

i:longint;

begin

 For i:=1 to 5 do begin Read(x); S:=S+x; end;

Write(S/5);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика