Показать сообщение отдельно

  #5976  
Старый 02.04.2010, 18:04
Qb1024
Участник форума
Регистрация: 15.07.2009
Сообщений: 200
С нами: 8854478

Репутация: 2
По умолчанию

Цитата:
Сообщение от Soherox  
Qb1024...вот, вроде так
PHP код:
function min(binteger): integer;
begin
  min
:=a;
  if 
b<a then min:=b;
end;

 var
     
nikmrezinteger;

begin
   readln
(km);
   
readln(n);
   
rez:=0;
   For 
i:=1 to min(km) do
     if ((
k div i) * (m div i)>=nthen rez:=i;
   
writeln(rez);
   
readln;
 
end
пасиб, затестим.
Просто я редко онлайн бываю, поэтому и отвечаю неоперативно.


Спасибо! Вреде всё правильно работает!

Последний раз редактировалось Qb1024; 02.04.2010 в 19:40..
 
Ответить с цитированием