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

Madina9742 Madina9742    3   07.07.2019 15:50    3

Ответы
Bogdasha06102015 Bogdasha06102015  02.10.2020 22:15
Program p1;
var S,T: string;
i:integer;
begin
T:='';
for i:=1 to 26 do
begin
S:=Copy (T,1,i);
writeln(S);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика