Регистрация
gnbufa
23.04.2022 19:14
Информатика
Есть ответ 👍

Помогите!
Вычислите сумму квадратов чисел одномерного массива К размером [5], заданного генератором случайных чисел.​

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

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

zcneltyn
zcneltyn
4,4(9 оценок)

ответ:

var

 K:array [1..5] of integer;

 sum :integer;

begin

 sum := 0;

 for var i := 1 to 5 do begin

   K[i] := random(100);

   sum := sum + (K[i] * K[i]);

 end;

 write(sum);

end.

viktorijavorob
viktorijavorob
4,4(93 оценок)
Var   n, s, i: integer; begin   for i: =30 to 100 do       if (i mod 3 =0) and ((i mod 10 = 2) or (i mod 10 = 4) or (i mod 10 = 8)) then       begin           n: =n+1; s: =s+i;       end;   writeln(s/n); end.

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