Снег мягкий, пушистый ложится ковром. И хлопья летят как с небес парашюты. Иду на концерт через парк напролом, Сегодня на сцене весь день лилипуты.
И что-то далёкое с детства пришло, Ворвалось тайком, будто кот в одеяло. И тут же волною приплыло тепло, И радостно сердцу как будто бы стало.
Секундой десятки годов протекли, И так же лилипут выступленье. Но средь временного пространства дали Случайно ворвались два быстрых виденья.
Был главным актёром тогда Коля Манг. Мне имя его не даёт всё покоя. И начал искать средь названий тот ранг, Что выйдет на тайну эстрады героя.
Искать не пришлось мне столетьями их, Друзья меня взяли с собою в походы. И хоть ветер памяти несколько стих, Скажу, что узнал, несмотря на все годы…
Пейзаж колоссальный, красавец- Мангуп! Дорога змеится, внизу- винограды. Но- дрожь пробирает, стучит зуб о зуб, И даже, похоже, туристы не рады…
Какой-то неясный, таинственный шум, Он то- наяву, то в тумане душевном. Пытаюсь уйти от тревожащих дум, Всё вижу вокруг в ореоле волшебном.
Кружится, как в сказке, серебряный свет, Мираж впереди, или жизни картина? Все краски опишет едва ли поэт, И месяц, как долька висит апельсина…
И вспомнил, что видел товарищ тогда, На странной вершине гористого плато. Вина мы не брали, лишь только еда, А, впрочем, оно ведь у всех виновато…
Сказал он наутро, что видел концерт, Куда направляли мы с ним свои ноги. Увидел он будущий свой там мольберт, И как я пишу про Мангуп эти строки…
Но именно там как в «окошко» глядел, Сквозь времени линзу, астрал-телескопа… А я сомневаться рассказу посмел, Как рыба в легенду морского потопа.
Мангуп по местам всё расставил теперь, Видение гор лишь под утро умчалось… Коль в «завтра» одна хоть имеется дверь, То ключ от замка нам найти уж осталось…
Алгоритм 1) a x a = a² ⇒ b; b x a = a³ ⇒ результат 2) a x a = a² ⇒ b; b x b = a⁴ ⇒ c; c x c = a⁸ ⇒ c; c x b = a¹⁰ ⇒ результат
Программа на языке PascalABC.Net var a,b,c,y:real; begin Write('Введите число: '); Read(a); b:=a*a; y:=b*a; Writeln('Третья степень числа равна ',y); c:=b*b; c:=c*c; y:=b*c; Writeln('Десятая степень числа равна ',y) end.
Тестовые решения: Введите число: 2 Третья степень числа равна 8 Десятая степень числа равна 1024
Введите число: -13.594 Третья степень числа равна -2512.128188584 Десятая степень числа равна 215512594781.574
Примеры редакторов работающие с растровой графикой: Paint; с векторной: Libreoffice Draw,CorelDraw,Inscape