Napisz w Delphi program, który wypisze liczby od -10 do 10.
{$APPTYPE CONSOLE}
Var I: Integer;
Begin
For I := -10 To 10 Do
Writeln(I);
End.
Edit: program wypisze oczywiście tylko liczby "bez przecinka". Liczb od "-10" do "10" jest nieskończenie wiele.
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
{$APPTYPE CONSOLE}
Var I: Integer;
Begin
For I := -10 To 10 Do
Writeln(I);
End.
Edit: program wypisze oczywiście tylko liczby "bez przecinka". Liczb od "-10" do "10" jest nieskończenie wiele.