Составьте блок-схему и напишите программу для нахождения среднего арифметического всех...

0 голосов
113 просмотров

Составьте блок-схему и напишите программу для нахождения среднего арифметического всех натуральных трехзначных чисел на отрезке [300; 900].


Информатика (12 баллов) | 113 просмотров
Дан 1 ответ
0 голосов

Var
n,i,sum: integer;
sr: real;
begin
 n:=0;
for i:=300 to 900 do
begin
 sum:=sum+i;
 n:=n+1;
 end;
  sr:=sum/n;
  writeln ('srednee=',sr);
  end.

(2.5k баллов)