Предмет: Информатика,
автор: nekolitka17
Имеется трёхзначное число, цифры которого различны. После зачёркивания в нём последней цифры, остаётся двузначное число, являющееся делителем данного. Найдите N-первых таких трёхзначных чисел. (N=70)
Ответы
Автор ответа:
0
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.
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.
Интересные вопросы
Предмет: История,
автор: Аноним
Предмет: Биология,
автор: urabalabol73
Предмет: Физика,
автор: caydel1337
Предмет: Математика,
автор: Lalalalla
Предмет: Обществознание,
автор: axmetzyanovad