С клавиатуры вводится 20 чисел. Найдите сумму тех из них, которые делятся на 5 и на 7. Pascal ABC

Это означает, что эти числа от 0 до 20

Ой не работает. И так и сяк пробовал ничего не вышло

"на 5 и на 7" - это значит, что число должно делится и на 5, и на 7?Если да, то:program sum;  var a, b, i:integer;begin;  for i:=1 to 20 do begin;    read(a);    if (a mod 5 = 0) and (a mod 7 = 0) then b+=a;  end;  write(b);end.Если нет, то замени "and" на "or".

 // PascalABC.NET 3.3, сборка 1627 от 27.01.2018// Внимание! Если программа не работает, обновите версию!begin  var mas:=ReadArrInteger(20);  var r:=mas.Where(t->(t mod 5=0) and (t mod 7 =0));  Writeln('Summa=',r.Sum);end.