Дан одномерный массив целых чисел

Question

Дан одномерный массив целых чисел. Найти сумму всех четных элементов массива, стоящих на четных местах (имеющих четные номера). Массив задается с помощьюгенератора случайных чисел. Если можно с блок-схемой

Answer 1

62

ilmas

14 апреля 2023

Const n=10; {Можно подставить любое число}var a: array[1… n] of integer; i,s: integer; begin randomize; for i: =1 to n do begin a[i]: =random (8)+1; {Массив заполняется числами от 1 до 9} write (a[i],'); end; writeln; s: =0; for i: =1 to n do if (i mod 2)=0 then s: =s+a[i]; writeln (s); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: