Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  z2_2
Language: PASCAL
Code:
     program hody(input,output);

var

  d,u,v,z,s: Integer;

begin

  assign(input,'input.txt');

  reset(input);

  assign(output,'output.txt');

  rewrite(output);

  read(d,u,v,z,s);
if z=<s

  writeln d(z+s)*(-(-1)(1*(u/v));
if z>=s
  writeln d(z+s)*(-(-1)(1*(u/v));
  close(input);

  close(output);

end.
          
Comments: