代码大全

TtlNewData

void SummariseDaily ...
{
GetOldData(OldData, &NumOldData);
TtlOldData = Sum(OldData, NumOldData);
PrintOldDataSummary(OldData,TtlOldData,NumOldData);

OldData

SaveOldDataSummary (TtlOldDataNumOldData);
...
GetNewData( NewData, &NumNewData);
TtlNewData = Sum( NewData, NumNewData);
PrintNewDataSummary( NewData,TtlNewData,NumNewData);

NewData

SaveNewDataSummary( TtlNewData, NumNewData );
...
}

10.2

C auto Pascal

Pascal New() Dispose()

C malloc() free()

C static

Turbo Pascal Pascal