PROGRAM text;
{using text variables} VAR {by A Programmer} name : STRING[10]; age : INTEGER; BEGIN name := 'A Programmer'; {use your name here} age := 15; WRITELN('my name is ', name); WRITELN('my age is ', age) END. |
The variable called name is defined as a string variable in line 3: name : STRING[10]; The number 10 in the square brackets means that the string can have up to 10 letters, or characters, in it. This program, of course, doesn't do a great deal. Apart from anything else, it prints the same thing every time you run it.
|
PROGRAM text;
{using text variables} VAR {by A Programmer} name : STRING[10]; age : INTEGER; days : INTEGER; BEGIN WRITE('enter your name : '); READLN(name); WRITE('enter your age : '); READLN(age); days := 365 * age; WRITELN('hello ', name); WRITELN('you are ', age); WRITELN('you must be at least ', days, ' days old!') END. |