найти наименьшее число, которое делится на заданное - вопрос №10825413 от AlicaMinenkova 07.03.2021 21:17

Question

Информатика: найти наименьшее число, которое делится на заданное пользователем число N, при этом оканчивается на заданную пользователем цифру ( предполагается что число может оканчиваться на цифру, которую задал пользователь )

AlicaMinenkova · Answer

var n,s,a,m:longint;

begin

readln(n,s);

m:=10;

if s mod n=0 then a:=s else a:=s*10;

while a mod n<>0 do

if a mod m=(m-1)

then begin m:=m*10; a:=s*m; end

else a:=a+1;

writeln(a);

end.

Объяснение:

вот на