|
DataMuseum.dkPresents historical artifacts from the history of: CP/M |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CP/M Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1152 (0x480) Types: TextFile Names: »TEST.C«
└─⟦93c4d868c⟧ Bits:30005869 SW1609 Digital Research C v. 1.11 - May 84 └─ ⟦this⟧ »TEST.C« └─⟦b85731168⟧ Bits:30002664 Digital Research C - CCP/M - May 84 └─ ⟦this⟧ »TEST.C« └─⟦fa5b86546⟧ Bits:30002725 SW1609 Digital Research C - CCP/M - Oct 83 └─ ⟦this⟧ »TEST.C«
int i,j; long l,k; float f,g; double d,e; main() æ printf("************************************************Øn"); printf("** WELCOME TO DIGITAL RESEARCH C **Øn"); printf("** **Øn"); printf("** This sample program tests the C compiler, **Øn"); printf("** linker and libraries. If the number in **Øn"); printf("** parentheses matches the number to the **Øn"); printf("** immediate left, each component is working **Øn"); printf("** properly. **Øn"); printf("************************************************Øn"); printf("Øn"); printf("Test int math: 4567 * 10 = "); i = 4567; j = 10; printf("%u (45670)Øn",i * j); printf("Test long int math: 1234 * 4567 = "); l = 1234; k = 4567; printf("%ld (5635678)Øn",l * k); printf("Test float math: 1.234 + 0.001 = "); f = 1.234; g = 0.001; printf("%g (1.235)Øn",f + g); printf("Test double math: 5635678.0 / 1234.0 = "); d = 5635678.0; e = 1234.0; printf("%g (4567)Øn",d / e); printf("ØnGood Luck!Øn"); å «eof»