даны два целых числа a и b.
напишите программу, которая находит произведение целых чисел от a до b, произведение которых на 6 оканчивается на 2
оброзец
1 10 ввод
14 вывод

var   a,b,p,i: integer;begin  write ('Введите 2 числа: ');  readln (a,b);  p:=1;  for i:=a to b do      if (i*6) mod 10 =2      then p:=p*i;  writeln (p);end.--------------Результат---------------Введите 2 числа: 1 1014