Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- program bintree;
- const SIZE = 50;
- var t:array[1..SIZE] of array[1..SIZE] of char;
- i:integer;
- j:integer;
- begin
- for i:=1 to SIZE do for j:=1 to SIZE do
- begin
- t[i][j]:='A'
- end
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement