tmul1.pp 149 B

1234567891011121314
  1. var
  2. i : longint;
  3. begin
  4. i:=5;
  5. i:=i*10;
  6. i:=i*62;
  7. i:=i*-10;
  8. i:=i*-62;
  9. i:=i*87;
  10. if i<>167214000 then
  11. halt(1);
  12. writeln('ok');
  13. end.