Contact: aviboots(AT)netvision.net.il
39,959 questions
51,901 answers
573 users
program MyProgram; var s1, s2:String; begin s1 := 'pascal'; s2 := 'programming'; writeln('s1 = ', s1); writeln('s2 = ', s2); end. (* run: s1 = pascal s2 = programming *)