Pascal a pętla for

Pascal a pętla for

Praktyczne wykorzystanie pętli For:

program pętla_for;
uses
crt;
var
a,i: byte;
begin
clrscr;
writeln('Podaj Liczbe ');
readln(a);
for i:=1 to 10 do
begin
a:=a+1;
writeln('Do twojej liczby dodano 1 dziesięć razy ',a);
end;
readln;
end.

Używamy cookies i podobnych technologii m.in. w celach: świadczenia usług, reklamy, statystyk. Korzystanie z witryny bez zmiany ustawień Twojej przeglądarki oznacza, że będą one umieszczane w Twoim urządzeniu końcowym. Pamiętaj, że zawsze możesz zmienić te ustawienia. To find out more about the cookies we use and how to delete them, see our privacy policy.

I accept cookies from this site.

EU Cookie Directive Module Information