Помигите с ивт 1) дан массив четных чисел…

Question

Помигите с ивт 1) дан массив четных чисел, определить сумму элементов которые делятся на 5 , стоящих на нечетных местах.2) Дано число и массив, найти количесвто элементов, равных данному числу

Answer 1

63

aquadelic

24 марта 2023

Program x; const n=10; var a: array[1… n] of integer; s,i: integer; begins: =0; for i: =1 to n do read (a[i]); for i: =1 to n do if (i mod 2 <> 0) and (a[i] mod 5=0) then s: =s+a[i]; writeln (s); end.program x2; const n=10; var a: array [1… n] of integer; k,i,s: integer; begins: =0; readln (k); for i: =1 to n do read (a[i]); for i: =1 to n do if a[i]=k then s: =s+1; writeln (s); end.

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

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

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

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

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