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

Question

36

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

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

ответить

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

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

stasmix · Accepted Answer

42

stasmix

12 апреля 2023

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:
Пароль: