Паскаль.

На интервале от 100 до 300 найти среднее арифметическое чисел, кратное 10.

Question

Информатика

Степанида

19 февраля, 22:45

Паскаль.

На интервале от 100 до 300 найти среднее арифметическое чисел, кратное 10.

+5

Ответы (1)

Знаете ответ на вопрос?

Игорич · Answer 1

Var

k, i:integer;

SrAr:real;

begin

k:=0;

s:=0;

for i:=100 to 300 do

if i mod 10=0 then

begin

k:=k+1;

s:=s+i;

end;

SrAr:=s/k;

writeln (Sr:5:2) ;

end.

Паскаль.На интервале от 100 до 300 найти среднее арифметическое чисел, кратное 10.

Паскаль.

На интервале от 100 до 300 найти среднее арифметическое чисел, кратное 10.