дано число. определить, оканчивается ли данное число на цифру 7.
СLS INPUT a IF a MOD 10 = 7 THEN PRINT "да, оканчивается" ELSE PRINT "нет, не оканчивается" END
по паскалю нужно
programm var begin и т.д
С помощью регулярного выражения /^\d+7$/ например