![]() |
|
|
#1
|
||||
|
||||
|
Вывести последовательность букв в следующем виде:
a ab abc abcd ....... a.....z че та я не могу понять как это сделать((помогите пожалуйста |
|
#2
|
||||
|
||||
|
В консольном приложении будет где-то так:
Код:
for i := 65 to 90
do begin
for j := 65 to i
do Write(Chr(j));
WriteLn;
end; |
|
#3
|
||||
|
||||
|
Страдалецъ, а можно полный код?
|
|
#4
|
|||
|
|||
|
А это и есть пролный код.
В консольном приложении только добавить описание переменных. |
|
#5
|
||||
|
||||
|
спасибо всем за помощь!!!
может создатите раздел домашних заданий? |
|
#6
|
||||
|
||||
|
Зачем 2 цикла????
Код:
var
s: String;
begin
s:='';
for i := 65 to 90 do
begin
s := s + Chr(i);
WriteLn(s);
end;
end; |
|
#7
|
|||
|
|||
|
Так круче:
Код:
var
C: Char;
S: string;
begin
S := '';
for C := 'a' to 'z' do
begin
S := S + C;
Writeln(S);
end;
end; |
|
#8
|
||||
|
||||
|
ЖЖоте господа, таких вопросов просто не ожидал.
Ладно бы на асме, в 4-битном процессоре но на Дельфях... эх, народ мельчает. |
|
#9
|
|||
|
|||
|
Цитата:
Цитата:
Цитата:
надо считать как от 1 до 1000 только счетом от chr(97 до 122) примерно так: 97 98 99 .. 122 9797 9798 9799 ... и т .д. Последний раз редактировалось almazz, 04.06.2010 в 13:03. |
|
#10
|
||||
|
||||
|
Цитата:
|
|
#11
|
|||
|
|||
|
Цитата:
|
|
#12
|
||||
|
||||
|
Тему закрыл. Ответ был дан (зря) во втором посте. Всем кто флеймил - предупреждение раз вы шутки не поняли.
|