PROGRAM Real1;
    VAR
        A: Real;
        B, C: Integer;
BEGIN
    A := 25.0;
    C := 25;
    B := 5;

    WriteLn(A, '/', B, '=', A/B);
    WriteLn(C, '/', B, '=', C/B);
    WriteLn(A, '*', B, '=', A*B);
    WriteLn(C, '*', B, '=', C*B);
END.
