Нужно написать программу. 1.дан массив чисел - вопрос №110208249749 от MrBOPOH 08.01.2023 21:20

Question

Информатика: Нужно написать программу. 1.дан массив чисел ,найти сумму элементов больше 10 и меньше 20

MrBOPOH · Answer

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. ...