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

Question

36

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

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

ответить

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

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

stasmix · Accepted Answer

42

stasmix

09 февраля 2024

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