Есть ответ 👍

1. в одномерном массиве а(10) вычислить среднее арифметическое квадратов положительных элементов.

272
389
Посмотреть ответы 3

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


Pascalabc.net 3.3.5, сборка 1644 от 23.03.2018 внимание! если программа не работает, обновите версию! begin   var a: =arrrandom(10,-50,50); a.println;   a.where(x-> x> 0).select(x-> x*x).average.println end. пример 29 45 -32 -44 -48 25 8 -4 -25 -22 888.75

Pascal abc. var        a: array [1..10] of integer;     i,sum,k: integer; begin        for i: = 1 to 10 do begin                  a[i]: =random(100)-50;                   if a[i]> 0 then begin sum: =sum+sqr(a[i]); inc(k); end;                   write(a[i], ' ');           end;           writeln;           writeln(sum/k); end.
asyast26
4,5(66 оценок)

1) 2

2) 78

3) 75

4) 109

5) 140

6) 215

7) 4

Объяснение:

1) 101000

2) 78_{16}

3) 74 < 75 < 76

4) 55_{8} + 40_{16} = 109_{10}

5)  ...:

) 135) 140) 137) 139

7) 200 < x < 205 = 4 цифр.

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