Недавно мы прошли символьный тип данных. Сегодня выкладываю пример решения задачи Паскаль с использованием типа 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 для начинающих. Здесь Вы найдете всю необходимую информацию об Убунту Линукс.
До речі, якщо у вас незабаром весілля, то вам потрібні весільні привітання! Бо привітання на весілля - це залог успішного весілля та довгого спільного життя.