Исходник, выводящий английский алфавит в определенной последовательности

Исходник, выводящий английский алфавит в определенной последовательности

Недавно мы прошли символьный тип данных. Сегодня выкладываю пример решения задачи Паскаль с использованием типа Char.

Итак, задача следующая: вывести определённую последовательность английского алфавита. Последовательность должна иметь такой вид: ZYYXXX..AA..AA, то есть английский алфавит выводится с конца, причем каждая следующая буква выводится столько же раз, сколько предыдущая плюс один. Решение задачи Pascal очень даже простое. Исходник имеет очень подробные пояснительные комментарии, поэтому объяснять ещё раз нет смысла.

Исходный код программы на Паскаль:

var i,n:integer; //Описание переменных
ch:char;
Begin //Начало программы
n:=1; //Присваивание количеству букв - 1
For ch:='Z' downto 'A' do begin //Цикл англ. алфавита в обратном порядке
for i:=1 to n do //Вывод нужного количества букв
write (ch);
n:=n+1; //Уывеличение количества букв
end; //Конец цикла
end. //Конец программы


Скачать исходник: ZYYXXX.pas

Хотите пользоваться стабильной, надежной и бесплатной операционной системой? Тогда добро пожаловать на сайт Ubuntu Linux для начинающих. Здесь Вы найдете всю необходимую информацию об Убунту Линукс.

До речі, якщо у вас незабаром весілля, то вам потрібні весільні привітання! Бо привітання на весілля - це залог успішного весілля та довгого спільного життя.
Автор: Zed от 2013-02-20 13:14:00   Просмотров: 2455

Теги: исходник исходники Паскаль скачать Pascal Char