Question

Найти среднее арифметическое чисел от 89 до 113 в паскаль

Answer 1

//Pascal ABC.Net 3.0
var i:integer;
s,k:real;
begin
for i:=89 to 113 do
s:=s+i;
k:=113-89+1;
s:=s/k;
writeln(s);
end.

Answer 2

Надо либо указать версию Паскаля, в которой s можно предварительно не обнулять, либо добавить оператор для обнуления s до цикла.