Помогите создать программу в паскале, которая сможет найти количество нечетных…

Question

84

Помогите создать программу в паскале, которая сможет найти количество нечетных элементов массива!) Срочно!) Заранееспасибо!) var a: array [1… 20] of integer;

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

gostyam · Accepted Answer

55

gostyam

27 января 2024

Program P; var i, s, elem: integer; a: array [1… 20] of integer; BEGIN s: =0; FOR i: =1 TO 20 DO BEGIN IF (a[i] mod 2=1) THEN s: =s+1; END writeln ('Число нечетных элементов', s) END; END.

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

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

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

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