Найти такое натуральное число, последняя цифра которого 5 - C (СИ)

Формулировка задачи:

Доброе время суток! В процессе написания практики возникла проблема с 1 задачей.Сразу уточню,что я не настолько наглая,чтоб просить от вас готовый код,я прошу только подсказать каким способом ее решать,а то у меня затор,идей нет абсолютно. Итак ,условие. Найти такое натуральное число,посл. цифра которого 5,чтоб при умножение его на 5 получить новое число,которое при вычеркиваение в нем последней цифры и приписывание ее в начало ,будет равно данному. Хоть какие-то идеи подайте) P.S.:Переводила условие с украинского.

Решение задачи: «Найти такое натуральное число, последняя цифра которого 5»

textual
                            Листинг программы 
                        
 
                        
                          
                    
var
  t,t1:string;
  l,k:integer;
  OK:BOOLEAN;
function mult(s,s1:string):string;
var
  i:integer;
  k:integer;
  r:string;
  tmp:integer;
begin
  r:='';
  tmp:=0;
  for i:=length(s) downto 1 do
    begin
      k:=strtoint(s[i]);
      tmp:=k*strtoint(s1)+tmp;
      r:=inttostr(tmp mod 10)+r;
      tmp:=tmp div 10;
    end;
    if tmp<>0 then
      Result:=inttostr(tmp)+r
    else Result:=r;
end;
 
begin
 
   t:='';t1:='';  l:=1;
   k:=0;OK:=FALSE;
   repeat
     l:=5*l+k;
     k:=l div 10;
     l:=l mod 10;
     t:=inttostr(l)+t;
     t1:=mult(t,'5');
     if (copy(t1,2,length(t1))=copy(t,1,length(t)-1)) and
      (t1[1]='5') and (t[length(t)]='5') then ok:=true;
   until OK;
   writeln(t);
   writeln(mult(t,'5'));
readln;
end.

Оцени полезность:

14 голосов , оценка 4.5 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы