Тема: Строки
Показать сообщение отдельно
  #2  
Старый 27.05.2010, 16:45
Аватар для Страдалецъ
Страдалецъ Страдалецъ вне форума
Гуру
 
Регистрация: 09.03.2009
Адрес: На курорте, из окна вижу теплое Баренцево море. Бррр.
Сообщения: 4,721
Репутация: 52347
По умолчанию

В консольном приложении будет где-то так:
Код:
for i := 65 to 90
do begin
    for j := 65 to i
    do Write(Chr(j));
    WriteLn;
    end;
__________________
Жизнь такова какова она есть и больше никакова.
Помогаю за спасибо.