Pascal Strings

Uploaded by

Putra Prasetya

We take content rights seriously. If you suspect this is your content, claim it here.

Available Formats

Download as PDF, TXT or read online on Scribd

0% found this document useful (0 votes)

76 views5 pages

Pascal Strings

Uploaded by

Putra Prasetya

We take content rights seriously. If you suspect this is your content, claim it here.

Available Formats

Download as PDF, TXT or read online on Scribd

You are on page 1/ 5

PASCAL - STRINGS

http://www.tutorialspoint.com/pascal/pascal_strings.htm Copyright © tutorialspoint.com

The string in Pascal is actually a sequence of characters with an optional size specification. The
characters could be numeric, letters, blank, special characters or a combination of all. Extended
Pascal provides numerous types of string objects depending upon the system and implementation.
We will discuss more common types of strings used in programs.

You can define a string in many ways −

Character arrays − This is a character string which is a sequence of zero or more byte-sized
characters enclosed in single quotes.

String variables − The variable of String type, as defined in Turbo Pascal.

Short strings − The variable of String type with size specification.

Null terminated strings − The variable of pchar type.

AnsiStrings − Ansistrings are strings that have no length limit.

Pascal provides only one string operator, string concatenation operator + .

Examples
The following program prints first four kinds of strings. We will use AnsiStrings in the next example.

program exString;
var
greetings: string;
name: packed array [1..10] of char;
organisation: string[10];
message: pchar;

begin
greetings := 'Hello ';
message := 'Good Day!';

writeln('Please Enter your Name');

readln(name);

writeln('Please Enter the name of your Organisation');

readln(organisation);

writeln(greetings, name, ' from ', organisation);

writeln(message);
end.

When the above code is compiled and executed, it produces the following result −

Please Enter your Name

John Smith
Please Enter the name of your Organisation
Infotech
Hello John Smith from Infotech

Following example makes use of few more functions, let's see −

program exString;
uses sysutils;
var
str1, str2, str3 : ansistring;
str4: string;
len: integer;
begin
str1 := 'Hello ';
str2 := 'There!';

(* copy str1 into str3 *)

str3 := str1;
writeln('appendstr( str3, str1) : ', str3 );

(* concatenates str1 and str2 *)

appendstr( str1, str2);
writeln( 'appendstr( str1, str2) ' , str1 );
str4 := str1 + str2;
writeln('Now str4 is: ', str4);

(* total lenghth of str4 after concatenation *)

len := byte(str4[0]);
writeln('Length of the final string str4: ', len);
end.

When the above code is compiled and executed, it produces the following result −

appendstr( str3, str1) : Hello

appendstr( str1, str2) : Hello There!
Now str4 is: Hello There! There!
Length of the final string str4: 18

Pascal String Functions and Procedures

Pascal supports a wide range of functions and procedures that manipulate strings. These
subprograms vary implement-wise. Here, we are listing various string manipulating subprograms
provided by Free Pascal −