Program Lady;
uses wincrt;
var
name : string;
female : boolean;
age : integer;
weight : real;
begin
name := 'Lady Gaga';
female := true;
age := 23;
weight := 49.89
writeln('Personal Data');
writeln('Name: ',name);
writeln('Female: ',female);
writeln('Age: ',age);
writeln('Weight: ',weight);
end.
To create an array variable, use:
var
i : Array[0..9] of Integer;
names : Array[0..4] of string;
names : Array['A'..'F'] of string;
To create an array variable, use:
var
i : Array[0..9] of Integer;
names : Array[0..4] of string;
names : Array['A'..'F'] of string;
No comments:
Post a Comment