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

спасибо,вот теперь еще все это понять

div это деление нацело?

a div 10 - челая часть от деления на 10

спс

var a:integer;beginrepeat  readln(a);  if (a - (a div 10)*10) <> 7 then writeln ('неверно');until (a - (a div 10)*10) = 7;writeln(a);end.