Составить программу которая печатает таблицу умножения. паскаль!

Число кратно 10 если оно заканчивается 0 в данном примере важна последняя цифра. последняя цифра суммы чисел зависит только от суммы последних цифр. последняя цифра произведения (степени числа) зависит только от произведения (степени цифры) чисел 91^10=*** (10 раз)=..1 --последняя цифра числа 1 42^10=..2**..* (10 раз)=**(5 раз)=..6*..6*..4= - последняя цифра 4 85^10=..5*..5**(10 раз)= - последняя цифра 5 значит последняя цифра данного числа равна ..1+..=..0 -- последняя цифра 0, а значит оно кратно 10. доказано

Pascalabc.net: begin   var a: =arrrandom(50,-500,500);   a.println;   var k: =a.where(x-> (abs(x) mod 10 = ;   var s: =a.where(x-> (abs(x) mod 10 = ;   if k=0 then writeln('в массиве нет элементов, оканчивающихся цифрой 3')   else writeln('среднее арифметическое элементов массива, оканчивающихся цифрой 3 = ',s/k); end. пример (для 10 элементов): 450 -159 189 463 262 220 -125 -41 -178 -62 среднее арифметическое элементов массива, оканчивающихся цифрой 3 = 463