Niezalogowany (Zaloguj się)
WItaj Gościu! Możesz się teraz zalogować lub poprosić o członkowstwo na Forum Turbo Pascal Web Pag

Turbo Pascal: [Utopiony] Napisz program, który wypisze liczby od -100 do -200, ale co 2 ( -100,-102,-104 ....)

W dół

Od 1 do 1 z 1

  1.  
  1.  
    program wypisuje2;
    var
    a:integer;
    begin
    a:-98;
    repeat
    a:a-2;
    writeln(a);
    until a =-200
    end.

Od 1 do 1 z 1

  1.