Песни о Паскале - [17]
>S:= S + ’ – чемпион!’;
предыдущее значение переменной S взято для формирования её нового значения. Теперь там окажется строка «Спартак минус чемпион!». Не обижайтесь, спартаковцы, – пошутил. Обязательно проверьте эту программу!
Всем данным в программе свойственен какой-либо тип. Это может быть строка, число или другой тип данных, с которыми вы скоро познакомитесь. То же касается и констант, например:
>const Pele = ’Эдсон Арантес ду Насименту’; <– это строка (string)
> Number = 12; <– это число
Здесь тип сам собой определяется тем значением, что дано константе.
Но существует и другая разновидность констант – типизированные константы, которые объявляются с явным указанием типа:
>const Pele : string = ’Эдсон Арантес ду Насименту’; <– это строка (string)
> Number : integer = 12; <– это число (integer)
В действительности это тоже переменные, и они могут изменяться в ходе выполнения программы. Но этим переменным изначально присвоены нужные значения, поэтому при запуске программы инициализация их через присваивание уже не требуется.
В Delphi разрешено инициализировать переменные при объявлении:
>var Pele : string = ’Эдсон Арантес ду Насименту’;
Но этот способ не совместим с Borland Pascal, и в данной книге не применяется.
• В одном операторе можно объявить несколько переменных одного типа.
• Процедура Writeln способна напечатать в одной строке несколько параметров. Параметры в списке разделяются запятыми.
• Операция присваивания «:=» помещает в переменную данные, представленные константой, переменной, или их комбинацией – выражением.
• Конкатенация – это объединение нескольких строк в одну.
• Для инициализации переменной необходимо либо ввести в неё данные процедурой Readln, либо заполнить оператором присваивания.
• Извлечение данных из переменных, которые не были инициализированы, бессмысленно и нередко вызывает крушение программы.
А) Что напечатает следующая программа?
>const Pele = ’Эдсон Арантес ду Насименту’;
>begin
>Writeln(’Pele = ’ + Pele); Readln;
>end.
Б) А эта программа что напечатает?
>var A, B : string;
>begin
>A:=’123’; B:=’456’;
>Writeln(’A+B= ’ + A + B); Readln;
>end.
В) Является ли следующий оператор оператором присваивания?
>const Pele = ’Эдсон Арантес ду Насименту’;
Г) Пусть ваша программа запросит у пользователя его адрес, а именно: город, улицу, номер дома и номер квартиры. А затем напечатает адрес одной строкой в таком виде:
>Город: ГГГ Улица: УУУ Дом: ДДД Квартира: ККК
Сделайте два варианта программы: один – с печатью нескольких параметров оператором Writeln, другой – с объединением строк.
Д) Какие из следующих операторов забракует компилятор?
>const
> Pele = ’Эдсон Арантес ду Насименту’;
> ABBA : string = ’Музыкальный шедевр из Швеции’;
>var
> Moscow : string;
>begin
> Pele := ’Лучший футболист мира’;
> ABBA := ’Распевают частушки’;
> Moscow:= ’Столица олимпиады’;
>end.
Глава 10
Условный оператор
Согласитесь, наши последние программы слегка поумнели, догнав по интеллекту попугая. Но негоже на лаврах почивать, – научим компьютер принимать осмысленные решения.
Вот секретное учреждение, вход в него строго ограничен. А вы – часовой, и пропускаете лишь тех, кто назовет пароль – слово «pascal». Наскучив на посту, вы задумали приспособить вместо себя компьютер. Ваша новая программа «P_10_1» должна запросить у пользователя пароль и решить, пропускать ли этого человека.
Что проще должности часового? Пускать или не пускать? Подобные вопросы решаются поминутно: свернуть направо или налево? орел или решка? быть или не быть? От полученного ответа зависят дальнейшие действия.
Обычно мы рассуждаем так: ЕСЛИ некоторое утверждение верно, ТО делаем одно, а ИНАЧЕ делаем другое. Например, ЕСЛИ на улице жарко, ТО наденем футболку, а ИНАЧЕ – свитер. Выделенные мною слова – ключевые в этом рассуждении. Переведя их на английский, получим условный оператор языка Паскаль.
Существуют два варианта условного оператора – полный и неполный. Полный оператор выражается тремя ключевыми словами: IF – «если», THEN – «то» и ELSE – «иначе», и записывается он так:
>IF <условие> THEN <Оператор_1> ELSE <Оператор_2>
Первый оператор выполняется, если условие верно, а второй – если ложно. Стало быть, условный оператор – это сложная конструкция, которая включает в себя другие операторы.
Теперь обратимся к условию, что это такое? Если я скажу, что это логическое выражение, вы ничего не поймете. С логическими выражениями мы скоро разберемся досконально, а здесь ограничимся лишь примером. Воспользуемся простейшим логическим выражением, которое заключается в сравнении двух строк. Предположим, что переменная S содержит введенный пользователем пароль, тогда условный оператор проверки пароля будет таким.
> if S = ’pascal’ then Writeln(’Проходите!’) else Writeln (’Стойте!’)
Здесь логическое выражение выделено курсивом. То же самое можно записать чуть иначе.
>if ’pascal’ = S
> then Writeln(’Проходите!’)
> else Writeln (’Стойте!’)
Теперь переменная S и константа «pascal» поменялись местами, и это никак не сказалось на условном операторе, поскольку знак равенства в логических выражениях означает сравнение (а не присваивание!).
Гера обладает необычным даром полёта. И эта её способность вызывает у одних — пламенную любовь и всплеск творчества, у других — желание подчинить и завоевать, у третьих — жажду обладания и овладения технологией чуда… Какова же судьба девушки в сложном, жестоком мире?
Четыре противоположности, чьи судьбы однажды удивительным образом переплелись – наемник, монах, воришка и маг – седлают коней. Что там, за горизонтом? Погони, разнесенные трактиры и странствующие музыканты да не оставят вас! Верные мечи, молитвы богам, ловкие руки, магия, и, конечно, верное плечо друга – и дороги будут благосклонны к своим любимцам, можете мне поверить.У менестрелей тяжелая работа. Но что на счет тех, кто им ее создает?
Воровство — тяжёлое и опасное ремесло. А уж в будущем, где идёт масштабная борьба технологий — и подавно! Одно-единственное дело может прославить исполнителя на всю обитаемую вселенную, а может безвозвратно погубить его карьеру. За свою небольшую жизнь Аля успела испытать на себе все прелести и блага известности, по чистой случайности не наткнувшись на изнанку успеха. Однако за спокойствие всегда приходится платить, и чем дольше оно будет длиться, тем дороже выйдет расплата. Свежие задания, новые знакомства, неожиданные встречи и непредсказуемые ситуации… Ни одному вору не дано знать, чем обернётся очередная вылазка, и не придётся ли после неё в спешном порядке менять привычный уклад жизни.Наконец и Але пришёл припозднившийся счёт.
На календаре 2283г. и у тебя светлое будущее.Ты — сын Советника Земного Союза и красивый парень. Отличник на курсе и прекрасный спортсмен. Просто тебе не повезло, Ли Кахори. Первой твоей ошибкой было влюбиться в сестру близкого друга, ну а второй — не отказаться от ваших взаимных чувств в угоду ее будущему жениху.Ты думал, что потерять ногу — это самое плохое в твоей жизни? Ты глубоко заблуждался, Лирой, мясорубка только начинается. Но ты ведь пройдешь этот путь до конца, так, Кахори? История про сильных духом, чья любовь разрушает любые преграды.Присутствует сёнэн-ай среди второстепенных героев.
Дело происходит в Питере. Молодой оперативник одного из убойных отделов Леонид Воронцов вызывает на допрос некоего бизнесмена Рыбкина с целью весьма низкой, а именно, получение взятки. Однако у Рыбкина, обвиняющегося в организации убийства своего зама, на этот счет совсем другие планы. Он подстраивает всё так, чтобы Воронцов получил сильный удар током, обычно в таких случаях ведущий к смерти. И Лёня действительно оказывается в морге. Однако в то время, когда для остальных такое путешествие, как правило, является последним, Лёнина история с него только начинается...