Регистрация
ArmyLAnn
13.04.2022 20:44
Информатика
Есть ответ 👍

Составьте программу на языке программирования Паскаль, в которой требуется выполнить следующие действия: • Пользователь задает с клавиатуры последовательность из n целых чисел (n также определяется пользователем). Найти среднее арифметическое чисел из этой последовательности.

115
472
Посмотреть ответы 3

Ответы на вопрос:

koshulinskayag
koshulinskayag
4,5(69 оценок)

var N,x,S,i:integer;

   SR:real;

begin

 writeln ('кол-во чисел в последовательности N=');

 readln (N);

 S:=0;

 for i:=1 to N do

 begin

   read (x);

   S:=S+x;

 end;

 Sr:=S/N;

 Writeln('Sr=',Sr)

end.

Объяснение:

davideblan33
davideblan33
4,6(75 оценок)

--- PascalABC.NET 3.6.2 ---

begin

 var N := ReadInteger();

 var S := ReadSeqInteger(N);

 S.Average.Println;

end.

Alisa11221122
Alisa11221122
4,4(8 оценок)

1 байт 8бит 1байт 8бит

Дурыс шыгар

Популярно: Информатика