Регистрация
Айка12341
16.08.2020 07:23
Информатика
Есть ответ 👍

Выберите функцию, которая проводит слияние значений, расположенных в ячейках А1, А2, А3 СЦЕП
СЧЕТЕСЛИ
СУММЕСЛИ
ЕСЛИ

196
440
Посмотреть ответы 1

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

Карик007
Карик007
4,5(89 оценок)

program z_1;

var a, s: real;

i, n, k: integer;  

begin

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

readln(n);

k : = 0;

s: =0;

for i : = 1 to n do

begin

writeln('введите ', i, '-е число: ');

readln(a);

s : = s + a;

k : = k + 1;  

end;

writeln('среднее арифметическое чисел: ', s / k);  

end.

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