Предмет:
ИнформатикаАвтор:
juniorwhxlvar f1,f2:text;
d,s,z,n:longword;
a,b,t,m,x:smallint;
begin
assign(f1,'input.txt');
reset(f1);
assign (f2,'output.txt');
rewrite(f2);
readln(f1,d,a,b,s,t);
if a>b then x:=a-b else x:=b-a;
if d mod s=0 then n:=d div s else n:=d div s+1;
if x mod t=0 then m:=x div t else m:=x div t+1;
z:=n+m;
write(f2,z);
close (f1);
close (f2);
end.
Автор:
addisynvgiaДобавить свой ответ
Предмет:
БиологияАвтор:
harringtonОтветов:
Смотреть
Предмет:
Русский языкАвтор:
ayannans1jОтветов:
Смотреть
Предмет:
Русский языкАвтор:
zavalaОтветов:
Смотреть