Найти суммуэлементов массива с четными индексами…

Question

Найти суммуэлементов массива с четными индексами, значение которых превышает К. (паскаль)

Answer 1

49

alexp

19 марта 2023

Uses crt; const n=20; var a: array[1… n] of integer; s,k,i: integer; beginfor i: =1 to n doread (a[i]); readln (k); s: =0; for i: =1 to n doif (i mod 2=0) and (a[i]>k) then s: =s+a[i]; writeln (s); end.

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

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

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

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

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