Ввести с клавиатуры два списка А и В, состоящих из 10 элементов. Решить уравнение ах=b, подставляя вместо а и b значения из списков. Результат вычислений поместить в список Х. Вывести на экран списки А, В, Х и все элементы списка Х, целая часть которых кратна 5.

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=new List<real>;  a.AddRange(ReadSeqReal('Введите список А:',10));  var b:=new List<real>;  b.AddRange(ReadSeqReal('Введите список B:',10));  var x:=new List<real>;  x.AddRange(a.Zip(b,(p,q)->q/p));  Write('A: '); a.Println;  Write('B: '); b.Println;  Write('X: '); x.Where(p->Trunc(p) mod 5=0).Println;end.ПримерВведите список А: 1 5 -2 3.5 12 16.3 -7 1.3 0.15 10Введите список B: 10.4 37 -14 6.3 1 -8 -12.94 6.9 18 52 A: 1 5 -2 3.5 12 16.3 -7 1.3 0.15 10B: 10.4 37 -14 6.3 1 -8 -12.94 6.9 18 52X: 10.4 0.0833333333333333 -0.49079754601227 5.30769230769231 120 5.2