К readln( добавь f, ибо программа работает нестабильно
Cls
rem a
let sum=0
let sred=0
let n=0
let i=1
input "n=";n
for i=1 to n step 1
input b
sum=sum+b
next n
sred=sum/n
print "Sred = ";sred
end
Var
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
<u>Результат</u>
5.5
Внутренняя память не отделима от компьютера, используется для временного хранения данных и хранения данных, необходимых для запуска и работы компьютера. Внешняя память сменная, используется для хранения данных пользователя