To work with ARRAY by example
Example:
program Welcome;
uses
WinCrt;
var
count,sum:integer;
mark:array [1..40] of integer;
begin
for count:=1 to 12 do
mark[sum]:=count+2;
Writeln(mark[sum]);
end;
end.
Output:
Post a Comment
No comments:
Post a Comment