fork download
  1. program varying_example(output);
  2. { This program demonstrates the differences between fixed- and variable-length strings. }
  3. var
  4. name1: array [1..25] of char; { String of size 25. }
  5. name2: array [76..100] of char;{ String of size 25. }
  6. name3: array [1..10] of char; {alfa;} { String of size 10. }
  7. name4: array [1..80] of char; {string;} { String of size 80. }
  8. name5: string; { Varying string. }
  9. name6: string; { Varying string. }
  10.  
  11. begin
  12. name1 := 'van Gogh';
  13. name2 := 'Monet';
  14. name3 := 'Rembrandt';
  15. name4 := 'Breughel';
  16. name5 := 'Matisse';
  17. name6 := 'Cezanne';
  18.  
  19. writeln(name1, ' and ', name2, '.');
  20. writeln(name3, ' and ', name4, '.');
  21. writeln(name5, ' and ', name6, '.')
  22.  
  23. end. { varying_example }
  24.  
  25.  
Success #stdin #stdout 0.01s 5304KB
stdin
Standard input is empty
stdout
van Gogh                  and Monet                    .
Rembrandt  and Breughel                                                                        .
Matisse and Cezanne.