Имеется трёхзначное число, цифры которого различны. После зачёркивания в нём последней цифры, остаётся двузначное число, являющееся делителем данного. Найдите N-первых таких трёхзначных чисел. (N=70)
Имеется трёхзначное число, цифры которого различны. После зачёркивания в нём последней цифры, остаётся двузначное число, являющееся делителем данного. Найдите N-первых таких трёхзначных чисел. (N=70)
Гость
Ответ(ы) на вопрос:
ГостьVar k,x,a:integer;
Begin
x:=100;
k:=0;
repeat
a:=x div 10;
if (x mod a)=0 then
begin
writeln(x);
k:=k+1;
end;
x:=x+1;
until k=70;
End.
Не нашли ответ?
Похожие вопросы