Много Баллов!!!
как сделать лесенку из алфавита в pascal abc
a
ab
abc
abcd...
.....
по принципу
program...
var i: byte;j: char;
begin
.....

program p1;var S,T: string;i:integer;beginT:='abcdefghijklmnopqrstuvwxyz';for i:=1 to 26 dobeginS:=Copy (T,1,i);writeln(S);end;end.