Определить первое целое число после 145, которое делиться ** 13 и 23. в паскаль

Question

Определить первое целое число после 145, которое делиться на 13 и 23. в паскаль

Answer 1

Var x:integer; 
begin 
x:=145; 
repeat 
x:=x+1; 
until (x mod 13=0) and (x mod 23=0); 
writeln(x); 
end.