b'\n_START_ARTICLE_\nP\xc4\x99tla (informatyka)\n_START_SECTION_\nPrzyk\xc5\x82ad \xe2\x80\x93 p\xc4\x99tla iteracyjna\n_START_PARAGRAPH_\nPoni\xc5\xbcej przyk\xc5\x82ad p\xc4\x99tli w j\xc4\x99zyku Pascal:_NEWLINE_var licznik : integer;begin_NEWLINE_  for licznik := 1 to 10 do_NEWLINE_    WriteLn(\'Wiersz numer \', licznik);end._NEWLINE_Przyk\xc5\x82ad w C++ jako wariant p\xc4\x99tli og\xc3\xb3lnej:_NEWLINE_for (int i = 0; i < 10; ++i)_NEWLINE_  std::cout << i << "-ta iteracja." << std::endl;_NEWLINE_Przyk\xc5\x82ad w C jako wariant p\xc4\x99tli og\xc3\xb3lnej:_NEWLINE_int i;for (i = 0; i < 10; ++i)_NEWLINE_  printf("%d-ta iteracja.", i);_NEWLINE_Przyk\xc5\x82ad w PHP:_NEWLINE_for ($i = 0; $i < 10; ++$i)_NEWLINE_  echo $i . "-ta iteracja.<br />\\n";_NEWLINE_Przyk\xc5\x82ad w JavaScripcie:_NEWLINE_var i;for (i = 0; i < 10; ++i)_NEWLINE_  document.write(i + "-ta iteracja.<br />");_NEWLINE_Przyk\xc5\x82ad w VB6 z Textboxem_NEWLINE_Dim i As IntegerText1.Text = ""For i = 0 To 10_NEWLINE_  Text1.Text = Text1.Text & iNext i_NEWLINE_Przyk\xc5\x82ad w VB6 z Debugwindow_NEWLINE_Dim i As IntegerFor i = 0 To 10_NEWLINE_  Debug.Print iNext i_NEWLINE_Przyk\xc5\x82ad w Pythonie:_NEWLINE_for i in range(1, 10):_NEWLINE_  print(i, \'. iteracja\', sep = \'\')'