9 lines
129 B
ObjectPascal
9 lines
129 B
ObjectPascal
Program oper;
|
|
Var a,b,c,d,e,f: integer;
|
|
Begin
|
|
Read (a,b,c,d);
|
|
E:=a div b;
|
|
f:= c mod d;
|
|
WriteLn (e);
|
|
WriteLn (f);
|
|
End. |