Язык - Паскаль. У меня по какой-то причине отрицательные числа не считаются.

Question

Язык - Паскаль. У меня по какой-то причине отрицательные числа не считаются.

---

Comments

-16 mod 10 = -1; Abs(-16) mod 10 = 6

---

В паскале так

---

-16 mod 10 = - 6, ошибка вверху

Answer 1

var

   a : array of integer := new integer[10];

   s : integer;

begin

   for var i := 0 to a.Length-1 do read(a[i]);

   foreach b : integer in a do begin

       write(b, ' ');

       if abs(b mod 10) = 6 then s += b;

   end;

   writeln(#13, s);

end.