Initial commit

This commit is contained in:
slederer 2024-09-10 23:57:08 +02:00
commit 65ee0cd1f4
80 changed files with 27856 additions and 0 deletions

15
tests/umlaut.pas Normal file
View file

@ -0,0 +1,15 @@
(*
test program for
multibyte characters
and tabs
*)
program umlaut;
var s:string = 'ÄÖÜß';
begin
writeln('Falsches Üben von');
writeln('Xylophonmusik quält jeden');
writeln('größeren Zwerg.');
writeln;
writeln(s);
writeln(length(s));
end.