Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  yyty
Language: PASCAL
Code:
program Z2_2(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: