_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

PRIMZAHLEN.C

FILE INFORMATION

FILENAME(S): PRIMZAHLEN.C

FILE TYPE(S): USR

FILE SIZE: 284b

FIRST SEEN: 2025-11-30 21:07:35

APPEARS ON: 3 disk(s)

FILE HASH

4e3c7bad48f586501f62751d548f785fc5de01ac390a4d6165f4dcac4ecc1b64

FOUND ON DISKS (3 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
COMPILERS PRIMZAHLEN.C USR DuncanTwain 9 0 DOWNLOAD FILE
C COMPILER 64 PRIMZAHLEN.C USR DuncanTwain 9 0 DOWNLOAD FILE
C COMPILER 64 PRIMZAHLEN.C USR DuncanTwain 9 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 85 81 1C 23 49 4E 43 4C  55 44 45 20 22 53 54 44  |...#INCLUDE "STD|
00000010: 49 4F 2E 43 22 0D 1C 0D  1C 4D 41 49 4E 28 29 0D  |IO.C"....MAIN().|
00000020: 1C DB 0D 1C 20 20 20 52  45 47 49 53 54 45 52 20  |....   REGISTER |
00000030: 49 4E 54 20 49 2C 4A 2C  46 4C 41 47 3B 0D 1C 0D  |INT I,J,FLAG;...|
00000040: 1C 20 20 20 46 4F 52 28  49 3D 31 3B 49 3C 49 2B  |.   FOR(I=1;I<I+|
00000050: 31 3B 2B 2B 49 29 20 DB  0D 1C 20 20 20 20 20 20  |1;++I) ...      |
00000060: 20 46 4C 41 47 20 3D 20  30 3B 0D 1C 20 20 20 20  | FLAG = 0;..    |
00000070: 20 20 20 46 4F 52 28 4A  3D 32 3B 4A 3C 49 3E 3E  |   FOR(J=2;J<I>>|
00000080: 31 3B 2B 2B 4A 29 0D 1C  20 20 20 20 20 20 20 20  |1;++J)..        |
00000090: 20 20 20 49 46 28 49 25  4A 20 3D 3D 20 30 29 20  |   IF(I%J == 0) |
000000A0: DB 0D 1C 20 20 20 20 20  20 20 20 20 20 20 20 20  |...             |
000000B0: 20 20 46 4C 41 47 20 3D  20 31 3B 0D 1C 20 20 20  |  FLAG = 1;..   |
000000C0: 20 20 20 20 20 20 20 20  20 20 20 20 42 52 45 41  |            BREA|
000000D0: 4B 3B 0D 1C 20 20 20 20  20 20 20 20 20 20 20 DD  |K;..           .|
000000E0: 0D 1C 20 20 20 20 20 20  20 49 46 28 21 20 46 4C  |..       IF(! FL|
000000F0: 41 47 29 0D 1C 20 20 20  20 20 20 20 20 20 20 20  |AG)..           |
00000100: 50 52 49 4E 54 46 28 22  25 44 5C 4E 22 2C 49 29  |PRINTF("%D\N",I)|
00000110: 3B 0D 1C 20 20 20 DD 0D  1C DD 0D 00              |;..   ......    |

...#INCLUDE "STDIO.C"....MAIN().....   R
EGISTER INT I,J,FLAG;....   FOR(I=1;I<I+
1;++I) ...       FLAG = 0;..       FOR(J
=2;J<I>>1;++J)..           IF(I%J == 0) 
...               FLAG = 1;..           
    BREAK;..           ...       IF(! FL
AG)..           PRINTF("%D\N",I);..   ..
....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL