написать программу, вычисляющую среднее арифметическое N чисел, введенных с клавиатуры. Цикл for; pascal.
Ответы на вопрос
Ответил ruslol
0
const n = 10;
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.
var b: Integer;
var a: array[1..n] of integer;
begin
for var i := 1 to n do
begin
Read(a[i]);
b+=a[i];
end;
Writeln(b/n);
end.
Новые вопросы