|
|
back to boardHelp me please. Where is error? В чем ошибка? var n,k,l:real;
begin
read(n,k);
l:=(n*2/k);
if trunc(l)=0 then write(2)
else if frac(l)=0 then write(l)
else write(trunc(l)+1);
end. Re: Help me please. Where is error? В чем ошибка? Posted by nxao 14 Jun 2015 04:44 l:=(n*2)/k; |
|
|
