Пожалуйста помогите СРОЧНО! Очень надо! Дан массив натуральны чисел. Найти сумму…

Question

36

Пожалуйста помогите СРОЧНО! Очень надо! Дан массив натуральны чисел. Найти сумму элементов кратных данному К. Программу написать наПАСКАЛЕ!

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

ответить

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

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

stasmix · Accepted Answer

42

stasmix

18 августа 2022

var a: array[1… N] of integer; s,K: integer; beginreadln (K); for i: =1 to N do readln (a[i]); for i: =1 to N doif (a[i] mod K=0) then s: =s+a[i]; write (s); end.

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

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

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

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