Написать программу распечатывающую сумму всех чисел - вопрос №310208875239 от Transylvania1 19.12.2020 15:13

Question

Информатика: Написать программу распечатывающую сумму всех чисел кратных 3 от 10 до 20

Transylvania1 · Answer

Var i,n,a:integer;a:array[1..100] of integer;beginfor i:=10 to 20 doif a[i] mod 3=0 then writeln(a[i]);end....