Регистрация
ZнyцPлaй
15.01.2020 00:17
Информатика
Есть ответ 👍

Нужно написать программу на паскале обязательно используя цикл for. программа вычисляет среднее арифметическое положительных элементов ряда чисел. каждый элемент ряда вычисляется по формуле: (12*k-21)/3, где k--номер элемента в ряду. всего элементов--необходимо спросить.

246
446
Посмотреть ответы 2

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

Weronika2017
Weronika2017
4,5(51 оценок)
Var k,n: integer; s: real; begin n: =0; write('k = '); readln(k); for k: = 1 to k do       begin       write((12*k-21)/3,' ');       if (12*k-21)/3 > 0 then             begin             s: =s+(12*k-21)/3;             n: =n+1             end;       end; writeln; write('sr = ',s/n) end.
СаММЫч
СаММЫч
4,7(54 оценок)
14 --> 9 --> 4 --> 12 --> 36 --> 31 ответ: 22112

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