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.