генератором случайных чисел (от 0 до 100) задан массив из 20 целых чисел. составьте программу, с помощью которой напечатайте на одной строчке исходный массив, а на следующей строке - сумму квадратов элементов с начетными индексами

Question

Милана Агафонова

Информатика

12 апреля, 01:32

генератором случайных чисел (от 0 до 100) задан массив из 20 целых чисел. составьте программу, с помощью которой напечатайте на одной строчке исходный массив, а на следующей строке - сумму квадратов элементов с начетными индексами

+3

Ответы (1)

Знаешь ответ на этот вопрос?

Лев Наумов · Answer 1

Pascal:

Const n = 20;

var a : array [1 ... n] of integer; i, sum : integer;

begin

randomize; for i: = 1 to n do a[i]: = random (100); for i: = 1 to n do write (a[i],' '); writeln; sum: = 0; for i: = 1 to n do if i mod 2 = 1 then sum: = sum + sqr (a[i]); writeln (sum);

end.