Ввести массив из 10 положительных чисел. программа должна посчитать сумму чисел кратных 5. написать программу pascalabc

Question

Информатика: Ввести массив из 10 положительных чисел. программа должна посчитать сумму чисел кратных 5. написать программу pascalabc .

Mariya1616161 · Answer

Var a : array [1..10] of integer ; begin  for var i:=1 to 10 do    read(a[i]);  var s:=a.Where(t- ( t mod 5 = 0));  Writeln( Cумма: ,s.Sum)end....

Ввести массив из 10 положительных чисел. программа должна посчитать сумму чисел кратных 5. написать программу pascalabc .