Program p1; var x,i,num:longint; function stepen(x,n:integer):longint; begin if n=1 then stepen:=x else stepen:=x*stepen(x,n-1); end; begin readln(x); writeln(stepen(x,12)); writeln(stepen(x,17)); writeln(stepen(x,20)); end.
Наверняка, Вы уже не один раз слышали о компании Microsoft, а также о том, какое она предоставляет программное обеспечение. Наиболее популярным из них считается Office, а большое количество людей использует текстовый процессор под названием Microsoft Office Word: студенты, бизнесмены, домохозяйки, офисные работники и т.д. Почему именно он, а не какой-либо другой текстовый процессор? Ведь на самом деле, его аналогов на сегодняшний день довольно много, но большинство людей предпочитают именно его. Все очень просто. Ведь именно Microsoft Word предоставляет множество возможностей своим пользователям. Вообще, текстовые процессоры, в отличие от тестовых редакторов, предоставляют больше возможностей для того, чтобы форматировать текст, внедрять в него таблицы, формулы, графики и другие объекты. Именно поэтому они довольно часто используются не только для набора текста, но и для того, чтобы создавать различные документы, а в том числе и официальные.
Microsoft Word - мощный текстовой процессор, предназначенный для выполнения всех процессов обработки текста: от набора и верстки, до проверки орфографии, вставки в текст графики в стандарте *.pcx или *.bmp, распечатки текста. Он работает с многими шрифтами ,как с русским ,так и с любым из двадцати одного языка мира. В одно из многих полезных свойств Word входит автоматическая коррекция текста по границам, автоматический перенос слов и правка правописания слов, сохранение текста в определенный устанавливаемый промежуток времени, наличие мастеров текстов и шаблонов, позволяющих в считанные минуты создать деловое письмо, факс, автобиографию, расписание, календарь и многое другое. Word обеспечивает поиск заданного слова или фрагмента текста, замену его на указанный фрагмент, удаление, копирование во внутренний буфер или замену по шрифту, гарнитуре или размеру шрифта, а так же по надстрочным или по подстрочным символам. Наличие закладки в тексте позволяет быстро перейти к заложенному месту в тексте. Можно так же автоматически включать в текст дату, время создания, обратный адрес и имя написавшего текст. При макрокоманд Word позволяет включать в текст базы данных или объекты графики, музыкальные модули в формате *.wav. Для ограничения доступа к документу можно установить пароль на текст, который Word будет спрашивать при загрузке текста для выполнения с ним каких-либо действий. Word позволяет открывать много окон для одновременной работы с несколькими текстами, а так же разбить одно активное окно по горизонтали на два и выровнять их.
var x,i,num:longint;
function stepen(x,n:integer):longint;
begin
if n=1 then stepen:=x
else stepen:=x*stepen(x,n-1);
end;
begin
readln(x);
writeln(stepen(x,12));
writeln(stepen(x,17));
writeln(stepen(x,20));
end.