1 solutions

  • 0
    @ 2025-11-5 15:55:10

    Pascal :

    var
     i:integer;
    begin
      for i:=1 to 100 do
      begin
      if ((i+3) mod 5=0) and ((i-3) mod 6=0) then begin write(i); break; end;
      end;
    end.
    
    • 1

    Information

    ID
    17327
    Time
    1000ms
    Memory
    128MiB
    Difficulty
    (None)
    Tags
    # Submissions
    0
    Accepted
    0
    Uploaded By