program varying_example(output);
{ This program demonstrates the differences between fixed- and variable-length strings. }
var
name1: array [1..25] of char; { String of size 25. }
name2: array [76..100] of char;{ String of size 25. }
name3: array [1..10] of char; {alfa;} { String of size 10. }
name4: array [1..80] of char; {string;} { String of size 80. }
name5: string; { Varying string. }
name6: string; { Varying string. }
begin
name1 := 'van Gogh';
name2 := 'Monet';
name3 := 'Rembrandt';
name4 := 'Breughel';
name5 := 'Matisse';
name6 := 'Cezanne';
writeln(name1, ' and ', name2, '.');
writeln(name3, ' and ', name4, '.');
writeln(name5, ' and ', name6, '.')
end. { varying_example }
cHJvZ3JhbSB2YXJ5aW5nX2V4YW1wbGUob3V0cHV0KTsKeyBUaGlzIHByb2dyYW0gZGVtb25zdHJhdGVzIHRoZSBkaWZmZXJlbmNlcyBiZXR3ZWVuIGZpeGVkLSBhbmQgdmFyaWFibGUtbGVuZ3RoIHN0cmluZ3MuIH0KdmFyCm5hbWUxOiBhcnJheSBbMS4uMjVdIG9mIGNoYXI7IHsgU3RyaW5nIG9mIHNpemUgMjUuIH0KbmFtZTI6IGFycmF5IFs3Ni4uMTAwXSBvZiBjaGFyO3sgU3RyaW5nIG9mIHNpemUgMjUuIH0KbmFtZTM6IGFycmF5IFsxLi4xMF0gb2YgY2hhcjsge2FsZmE7fSB7IFN0cmluZyBvZiBzaXplIDEwLiB9Cm5hbWU0OiBhcnJheSBbMS4uODBdIG9mIGNoYXI7IHtzdHJpbmc7fSB7IFN0cmluZyBvZiBzaXplIDgwLiB9Cm5hbWU1OiBzdHJpbmc7IHsgVmFyeWluZyBzdHJpbmcuIH0KbmFtZTY6IHN0cmluZzsgeyBWYXJ5aW5nIHN0cmluZy4gfQoKYmVnaW4KbmFtZTEgOj0gJ3ZhbiBHb2doJzsKbmFtZTIgOj0gJ01vbmV0JzsKbmFtZTMgOj0gJ1JlbWJyYW5kdCc7Cm5hbWU0IDo9ICdCcmV1Z2hlbCc7Cm5hbWU1IDo9ICdNYXRpc3NlJzsKbmFtZTYgOj0gJ0NlemFubmUnOwoKd3JpdGVsbihuYW1lMSwgJyBhbmQgJywgbmFtZTIsICcuJyk7CndyaXRlbG4obmFtZTMsICcgYW5kICcsIG5hbWU0LCAnLicpOwp3cml0ZWxuKG5hbWU1LCAnIGFuZCAnLCBuYW1lNiwgJy4nKQoKZW5kLiB7IHZhcnlpbmdfZXhhbXBsZSB9Cg==