Дан массив а(16-элементов) необходимо вывести на экран положительные элементы меньше 15, а также найти среднее арифметическое элементов массива,которые больше 16.

218

261

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

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

elizavetachery

Информатика

4,5(32 оценок)

Const n = 16; var a : array [1..n] of integer; i, kol, sum : integer; sr : real; begin for i: = 1 to n do readln(a[i]); for i: = 1 to n do if (a[i] > 0) and (a[i] < 15) then writeln(a[i]); kol: = 0; sum: = 0; for i: = 1 to n do if a[i] > 16 then begin inc(kol); sum: = sum + a[i]; end; sr: = sum/kol; writeln(sr); end.

АлёнаКож

Информатика

4,6(53 оценок)

Величина может принимать значение трехзначного числа в троичной системе счисления. поэтому основание системы счисления возводим в степень количества ячеек памяти. 3^3 = 27