program pierwsza; t(d) var n, p : word; b : boolean; begin readln (n); 1 p := 2; 1 b := true; 1 while ( (p*p <= n) and b) do 3* n begin if n mod p = 0
{"Image DocumentName": "Sprawd\u017a czy liczba naturalna n, n >= 0, jest liczb\u0105 pierwsz\u0105 .", "Image ImageDescription": "D = { n : n \uf0ce word } program pierwsza; t(d) var n, p : word; b : boolean; begin. readln (n); 1. p := 2; 1. b := true; 1. while ( (p p <= n) and b) do \uf0a3 3 \uf0eb\uf0d6n\uf0fb if n mod p = 0 then b := false; \uf0a3 2 (\uf0eb\uf0d6n\uf0fb -1)+1. p := p + 1; \uf0a3 2 (\uf0eb\uf0d6n\uf0fb -1) end; if b then writeln (\u2018To jest liczba pierwsza\u2019) 1. else writeln (\u2018 To nie jest liczba pierwsza\u2019); 1. end. t(n) \uf0a3 7\uf0eb\uf0d6n\uf0fb + 1 T(n) = O(\uf0d6n )", "Image XResolution": "37", "Image YResolution": "37", "Image ResolutionUnit": "Pixels/Centimeter", "Image Software": "SlidePlayer", "Image YCbCrPositioning": "Centered"}