Помогите написать программу на паскале.Надо чтобы программа определяла что введенное число оканчивается на 7

Илья, попробуйте этот вариантvar a:integer;beginrepeat  readln(a);until (a - (a div 10)*10) = 7;writeln(a);end.