代码大全

18-50 Pascal
CustomerPurchases := CustomerPurchases + CustomerSales ( CustomerID );
CustomerBill := CustomerBill + CustomerPurchases;
TotalCustomerBill := CustomerBill + PreviousBalance ( CustomerID ) +
LateCharge ( CustomerID );
CustomerRating := Rating ( CustomerID, TotalCustomerBill );

18.5.5

Pascal C Ada Fortran
7

i=0 j=0 k=0 DestroyBadLoopNames(i j k);

C C ++

18-51 n 4

18-5 1 C

Printf( d d n ,++n, n+2);

4 6? 5 7? 5 6? ++n 5
C n+2
6 7 18-52