Turbo Pascal

Richieste di programmi e risoluzione di dubbi

« Older   Newer »
 
  Share  
.
  1. Ripper346
     
    .
    Avatar

    Prince Of Game Legend Member lv15

    Group
    Member
    Posts
    6,746
    Location
    dalla casa dell'Uomo del Monte

    Status
    Offline
    sn queste istruzioni
    SPOILER (click to view)
    for i:=2 to numero - 1 do
    begin
    n:= numero mod i;
    if n= 0 then goto no;
    if i= numero - 1 then goto si;
    end;


    il primo è per constatare che non sia pari e il secondo x vedere se i è uguale al numero -1
    caspita è difficile spiegartelo!
     
    .
27 replies since 5/5/2007, 15:36   927 views
  Share  
.