const
n=15;
var
s: array [1..n] of integer;
sum,i:integer;
begin
for i:=1 to n do
s[i]:=random(41);
write(s[i],' ');
sum:=sum+s[i];
end;
writeln;
writeln(sum/n:0:3);
end.
Если моё решение вам помогло, отметьте его как лучшее. Спасибо! Удачи!
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
const
n=15;
var
s: array [1..n] of integer;
sum,i:integer;
begin
for i:=1 to n do
begin
s[i]:=random(41);
write(s[i],' ');
sum:=sum+s[i];
end;
writeln;
writeln(sum/n:0:3);
end.
Если моё решение вам помогло, отметьте его как лучшее. Спасибо! Удачи!