Loop structures: Difference between revisions

Line 429:
'''Compiler:''' [[Turbo Pascal]] 7.0
 
FOR counter := 1 TO 10 DO
BEGIN
procedure1;
Line 441:
Counter : char ;
 
FOR counter := 'A' TO 'Z' DO
BEGIN
procedure1;
Anonymous user