This is the second disk of the PASCAL TUTOR system. It has the
Submitted By:
WEBMASTER
Rating:
(Not rated) (
Rate It)
(* Chapter 7 - Program 2 *)
program TURBO_Pascal_Strings;
var First_Name : string[10];
Initial : char;
Last_Name : string[12];
Full_Name : string[25];
begin (* main program *)
First_Name := 'John';
Initial := 'Q';
Last_Name := 'Doe';
Writeln(First_Name,Initial,Last_Name);
Full_Name := First_Name + ' ' + Initial + ' ' + Last_Name;
Writeln(Full_Name);
end. (* main program *)
