|
Geben Sie folgenden Code ein:
Do[
If[ PrimeQ[n] && (PrimeQ[n-2] || PrimeQ[n+2]),
Print[n," Primzahlzwilling"], Print[n] ],
{n,2,1000}]
Dabei bedeutet && das logische
und und || das logische oder:
Wenn n und (n-2 oder n+2) Primzahlen sind, erfolgt die Kennzeichnung als Primzahlzwilling. Zurück zu den Aufgaben |