За помощ на този оператор промените в Turbo Pascal могат да бъдат зададени на собствена стойност по програмен начин (което не е от клавиатурата). Формат:

<идентификатор (имя) переменной>:= <выражение>

Системата изчислява стойността на вируса по ред, след което да продължим.

складов оператор.

Складовият оператор е последователността от всякакви оператори на Turbo Pascal, поставени в началната и крайната операторна дъга. Например:

начало a:=5; write('a=',a); край;

Сред операторите на складовия оператор може да има и други складови оператори, така че е позволено да бъде дълбочината на тяхната инвестиция. Например:

Интелигентен преходен оператор.

Вонята се основава на организацията на разгалужен угар под формата на истина и чибности на пеещия ум. Има два такива оператора: repeat интелигентен операторче nepovny umovny оператор.

Нов интелигентен оператор

Внедряване на алгоритмичната конструкция "външно разклонение":

Його формат:

ако <логическое выражение> тогава <оператор 1> друго <оператор 2>

Ако, тогава, друго - служебни думи "yakshcho", "todі", "nakshe". Преди думата друго, не слагайте петънце с кого. Оператор 1 и оператор 2 могат да бъдат или прости оператори, или оператори на склад. Операторът на склад трябва да бъде поставен в дъгите на оператора започват и свършват.

Функции на интелигентния оператор: ако е логически viraz, ако стойността е вярна, тогава оператор 1 е победител, ако е логически viraz, ако стойността е false, тогава оператор 2 е победител.

Непълен интелигентен оператор

Реализация на алгоритмичния дизайн "непълна вилка"

Його формат:

ако<логическое выражение> тогава<оператор >

Ако тогава - служебни думи "yakshcho", "todі". Операторът може да бъде прост като оператор, така че нека добавим i.

Функции на интелигентния оператор: ако стойността е вярна, ако е логична, тогава операторът се преодолява, ако стойността е фалшива, ако стойността е фалшива, тогава интелигентният оператор се пропуска и операторът, който го следва, е победен.

Интелигентните оператори (нови и грешни) могат да се използват като вложени конструкции, така че след съвпадението THEN или ELSE интелигентният оператор да бъде пренаписан. Служебната дума ELSE винаги трябва да се добавя към най-близката дума THEN.

Един прост оператор може да влезе в склада на интелигентен оператор. Необходимо е да се вкара клонче оператори зад чувала на управителя, смрадта се обединява в складовете.

уважение:след думата THEN, нов интелигентен оператор не може да бъде написан веднага, но след ELSE може. Например:

В vipadkah, ако е необходимо да се преобразува малко умове, умните оператори ще спрат. Има логически операции и, не, или. Например:

яксо ((x>3) и (y>3) и (z>3)) тогава ...

Оператори на организация на цикли.

Цикъл - ce bagatorarazovo многократно дилянка програма. За организиране на цикъл в Pascal има три оператора: оператор от peredum, оператор от след преместване и оператор от параметър.

Цикъл оператор с промяна на мнението

Този оператор внедрява блок-схема за цикъл с преосмисляне:

Його формат:

Докато <логическое выражение> направи <тело цикла>

Докато ("тихо"), Do ("робити") - служебни думи.

Оператор Dії: докинг логически viraz може да оцени true, тяло на цикъла; Много е логично и приема стойността false, изявлението на оператора завършва и операторът е победен, което го следва. Значението на логическата вираза се проверява преди тялото на цикъла. Колкото и логично да е, вираз хибно на кочан, тялото на цикъла отново е пропуснато.

Сякаш цикълът трябва да отмъсти за последователността от оператори, изглежда, че се прави от складовия оператор, на кочана, че в крайна сметка е необходимо да се напишат операторни дъги Begin и End.

Тъй като тялото на цикъла е един оператор (не съхранение), тогава операторните дъги не са необходими. Тогава преводачът взема предвид, че тялото на цикъла завършва на най-близкия знак ";". Паскал няма специални думи за разбиране на кочана на цикъла и края на цикъла. За всички випадки са универсални думи Начало и Край.

Цикъл оператор с posthum

Този оператор внедрява блок-схема за цикъл с последващо преместване:

Його формат:

Повторете <тело цикла> До <логическое выражение>

Повторете ("повторете"), До ("доти") - служебни думи.

Тялото на цикъла може да бъде единично, така че е складов оператор, защитата на Начало и Край не е необходима, фрагментите на думата Repeat и Until играят ролята на операторни дъги.

Функции на оператора: тялото на цикъла се бие, след което се проверява стойността на логическата последователност. Ако е по-логично, ако стойността е фалшива, тялото на цикъла се подновява. Така че опитайте до този час, докато логическият израз приеме стойността true. Към цикъла повтарям моята виконаня, сякаш хибна на Умов. Повторението ще свърши, ако станете умен. Действието на оператора приключва и операторът, който го следва, е победен. Значението на логическата вираза се преразглежда след тялото на цикъла.

уважение:

Преди кожата vikonannym, цикълът на логически вираз е отговорен за майката на специфично значение.

Тялото на цикъла е виновно, че майката иска само един оператор, което се влива в смисъла на логическия израз, в противен случай цикълът ще се повтаря безкрайно много.

Zreshtoy, логически вираз може да приеме значението, което завършва цикъла.

Цикъл оператор с параметър

Този оператор изпълнява блок-схемата за цикъла с lichnik. Його формат:

за <параметр цикла>:= <арифметическое выражение 1> да се <арифметическое выражение 2> направи <тело цикла>

за < параметр цикла >:= < арифметическое выражение 1> надолу към < арифметическое выражение 2> направи <тело цикла>

Параметър към цикъла - tse zminna be-what type, наистина.

Аритметични стихове 1 и 2 се дължат на същия тип, който е параметърът на цикъла. Тялото на цикъла е Pascal оператор (прост, сгъваем, сгъваем).

Функция на оператора: параметърът на цикъла трябва да има стойността на аритметичната променлива 1. Това е много по-малко (за за- да се- направи) или повече (за за- надолу към- направи) стойността на аритметичната вираза 2, бие тялото на цикъла. Тогава параметърът на цикъла увеличава (променя) стойността, посочена в името на цикъла. Нека продължим да повтаряме отново с аритметичната вираза 2. И така до края на цикъла, докато параметърът на цикъла стане по-голям (по-малък) от стойността на аритметичната вираза 2. Тогава операторът на цикъла приключва работата и следващия операторът го следва.

Ако параметърът на цикъла е от целочислен тип, тогава с думата to променете параметъра на последните (ако downto, последният е -1).

Този оператор може да бъде в застой, така че може да спечели само в тихи ситуации, ако знаете броя на повторенията на тялото на цикъла

С един от най-известните кинематографисти във филма Turbo Pascal - операторът, който вече познавахме. По-долу са други оператори на филми.

складов оператор- последователността от допълнителни оператори в програмата е поставена в ръцете на оператора - думите са запазени начало... край. Складовите оператори са важен инструмент на Turbo Pascal, който прави възможно писането на програми модерна технология структурно програмиране(без оператори в прехода ОТИДЕТЕ).

Mova Turbo Pascal не налага никакви годишни ограничения за естеството на операторите, влизащи в склада на оператора. Сред тях може да има и други складови оператори - Turbo Pascal позволява определена дълбочина на депозит:

Започнете……. започнете ……. начало …… …… край; ……край; ……край;

Всъщност, цялото разделение на оператори, рамкирани с думи начало... край, є от един съхраняем оператор. Оскилки е запазена дума крайе оператор лък, що закрива, той веднага показва края на оператора напред, поставете символа ";" пред него neobov'yazkovo, и дадох във всички задници на моята работа.

Наличието на точка с която пред крайв предните приклади означаваше, че между оставащия оператор и лък на оператора край roztashovuetsya празен оператор. Празният оператор не отмъщава за годишния ден, просто програмата се добавя към програмата точка по точка. По принцип празният оператор се избира за прехвърляне на контрола към края на подредения оператор.

Празният оператор не отмъщава за същите символи и не пропуска последните. Победа за организацията на прехода до края на блока на изходите, тъй като е необходимо да пропуснете няколко оператора, но не и да излезете от блока. За което, преди края на запазената дума, поставете знак и двоен знак, например:

Глава 2. Оператори на движение в Pascal Структурни оператори

Структурните оператори са конструкции, подканени от други оператори по определени правила. Можете да ги разделите на три групи: склад, ум и повторение. Zastosuvannya структурни оператори във вашата програма често е просто неизбежна, тъй като зловонието позволява на програмиста да изгради програма от унищожени умове, например, въведена от koristuvach. Дотогава, повтарят застосовуващите оператори, ще се възползвате от възможността да направите големи дългове за малка сума пари за един час

Глава 2

Този оператор е колекция от голям брой оператори, един в един пластир с кома, който е заобиколен от начални операторни арки. Vіn се използва като една цел и може да бъде на всяко място на програмата, където е възможно присъствието на оператора.

Глава 2

Интелигентните оператори са определени за избор до края на един от възможните дни, застояли в дневния ум (с който един от дните може да се използва ежедневно). За алгоритми за програмиране, които са бъгове, има специални оператори в Turbo Pascal. Един от тях е интелигентният оператор If. Това е една от най-популярните функции, които променят реда на оператора в програмата.

Vin може да приеме една от следните форми:

Ако<условие>тогава<оператор1>

друго<оператор2>;

Ако<условие>тогава<оператор>;

По този начин операторът печели. Вираз се брои на гърба, рекорди за ума. Чрез грешката на изчислението излиза стойността на логическия (булев) тип. Ако стойността е "true", тогава е избран оператор1, изрази след думата then. Ако резултатите може да са „глупости“, оператор2 е победител. Като заместител на оператор 1 или оператор 2, следващ серия от оператори, тогава тази серия от оператори трябва да бъде поставена в операторни дъги начало ... край.

Внимавайте да не поставяте точка преди думата друго.

дупето 1. Съставете програмата, така че да попитате детето за една година и тогава да видим решението за приемане на детето в училище (за следващите 7 години).

Ако v>=7 тогава writeln('Ела преди училище')

Мениджър. Променете програмата, за да затворите горната граница между прием и училище 16 години.

Write('Въведете име на детето');

Ако (v>=7) и (v<=16) then writeln(‘Принимаем в школу’)

else writeln('Не се приема преди училище');

дупето 2. Дадени са две числа. Най-малкото от тези числа трябва да бъде заменено със сумата от тези числа, най-много - чрез създаване.

Var x, y, s, p: цяло число;

Write('Въведете 2 числа');

след това започнете y:=s; x:=p; край

иначе започват x:=s; y:=p; край;

writeln('x=', x);

writeln('y=', y);

Точно както операторът If позволява избор на две алтернативи, това е оператор, който позволява избор на доста голям брой опции. Този оператор изберете Случай. Vіn организира прехода на една от множеството опции и попада в стойността на избора, наречен селектор.

Горещи очи: Случай k на

: <оператор1>;

: <оператор2>;

: <операторN>

друго<операторN+1>

Ето k-viraz-селектор, който може или не може да бъде прост порядков тип (ciliy, символичен, логически). , …- Константи от същия тип като селектора.

Операторът Case работи на офанзивен ранг. Стойността на виразния селектор се брои по ред, след което се поема изпълнението на оператора, константата за избор коя стойност е равна на стойността на потока на селектора. Ако някоя от константите не съвпада със стойността на селектора, тогава операторът, който следва думата else, е изпреварен. Ако остане същата дума, тогава се активира операторът, който се опитва да остане зад кордона Case, tobto. след думата край.

При използване на оператор Case се прилагат следните правила:

1. Селекторът на Virase може да бъде само обикновен порядков тип (ciliy, символичен, логически).

2. Използвайте константи, за да преминете към алтернативни оператори поради същия тип като селектора.

3. Всички константи в алтернативите могат да бъдат уникални в границите на оператора за избор.

Формирайте операторски запис:

Селектор за тип интервал:

1..10: writeln('число в диапазона 1-10');

11.. 20: writeln('число в диапазона 11-20');

elsewriteln('брой позиции между необходимите диапазони')

Селектор на целочислен тип:

дупето 1. Сгънете програмата, така че след въвеждане на номера на деня от деня да изведе името на екрана.

Write('Въведете номера на деня от седмицата');

1: writeln('понеделник');

2: writeln('вторник');

3: writeln('сряда');

4: writeln('четвъртък');

5: writeln('петък');

6: writeln('събота');

7: writeln('Седмица')

elsewriteln('Няма такъв ден');

дупето 2. Сгънете програмата, така че след въведеното число на месеца да покажа на екрана името на съдбата на годината.

Write('Въведете номер на месеца');

1, 2, 12: writeln('Зима');

3, 4, 5: writeln('Пролет');

6, 7, 8: writeln('Лято');

9, 10, 11: writeln('Есен')

elsewriteln('Няма такъв месец');

Глава 5
Turbo Pascal-7 Операторите на филма описват действията на алгоритмичните действия, тъй като е необходимо да се виконира при завършване на задачата. Тялото на програмата може да бъде последователност от такива оператори. Операторите на програмите, които вървят една по една, са разделени точка по точка. Операторите на Us mov Pascal могат да бъдат разделени на две групи: прости структурирани. 5.1. Простете на операторите Простете на операторите, за отмъщение на собствените им оператори. Пред тях се вижда: - Операторът е привлечен; - Връщане преди процедурата; - Crazy GOTO оператор за преход; - Празен оператор. Заповедта преди процедурата ще бъде разгледана в клауза 10.1, рещата - на кого е била разделена. 5.1.1. Оператор за присвояване За помощ на оператора за промяна или се очаква функцията да има стойност. Знакът се присвоява на първия: =, леворуч, който се записва от неговата променяща се функция, на която се присвоява стойност, а вдясно - вираз, чиято стойност се изчислява преди присвояването. Допустимо е да промените стойността на функцията и да я промените на всеки тип, с изключение на типа на файла. Типът вираза и видът на промяната (или функциите) са отговорни, но също така и сума за задачата (раздел. стр. 9.3). дупето. X:=Y; Z:= A +; Res:= (I>0) и (I<100); I:= Sqr(J) + I*К; 5.1.2. Оператор безусловного перехода GOTO. Использование меток Оператор GOTO позволяет изменить стандартный последовательный порядок выполнения операторов и перейти к выполнению заданного оператора. Оператор, на который происходит переход, должен быть помечен меткой. Эта же метка должна быть указана и в операторе GOTO. Метки, используемые в Turbo Pascal, могут быть двух типов: - целым числом в пределах от 0 до 9999; - обычным идентификатором. Все используемые метки должны быть перечислены в разделе объявления меток, начинающемся зарезервированным словом label, например: label 1, 2, Metka; Одной меткой можно пометить только один оператор. Метка от помеченного оператора отделяется двоеточием. Использовать оператор GOTO следует крайне осторожно. Широкое его применение без особых на то оснований ухудшает понимание логики работы программы. Безусловный переход можно осуществлять далеко не из каждого места программы и не в любое место программы. Так, нельзя с помощью этого оператора перейти из основной программы в подпрограмму или выйти из подпрограммы, не рекомендуется осуществлять переход внутрь структурированного оператора, т. к. он может дать неправильный результат, и т. д. Более подробно о таких ограничениях см. [ 1 ]. Пример. Найти частное от деления целых чисел. program EXAMPLE4; label Out; {описание метки} var X, Y, Res: Integer; {описание переменных} begin Write("Введите делимое:"); {вывод сообщения на экран} ReadLn(X); {чтение числа} Write("Введите делитель:"); {вывод сообщения на экран} ReadLn(Y); {чтение числа} if Y = 0 then begin {это - Составной оператор, см. п. 5.2.1} WriteLn("Деление на ноль недопустимо! Выхожу..."); goto Out; {выход при нулевом делителе} end; Res:=X div Y; WriteLn("Частное равно: ",Res); Out: {метка "пустого" оператора} end. 5.1.3. Пустой оператор Пустой оператор не выполняет никакого действия и никак не отображается в программе (за исключением, быть может, метки или точек с запятыми, отделяющих пустой оператор от предыдущих или последующих операторов). Он может потребоваться для осуществления на него безусловного перехода (см. пример в п. 5.1.2). 5.2. Структурированные операторы Структурированными являются такие операторы, которые включают в себя другие операторы. К структурированным операторам относятся: - составной оператор; - условный оператор IF; - условный оператор CASE; - оператор цикла REPEAT; - оператор цикла WHILE; - оператор цикла FOR; - оператор над записями WITH. Оператор над записями WITH будет рассмотрен в разделе 6.4, остальные - в данном разделе. 5.2.1. Составной оператор Составной оператор представляет собой совокупность последовательно выполняемых операторов, заключенных в операторные скобки begin и end: begin <оператор 1>; <оператор 2>; . . . <оператор N>край; Vіn може да е необходим в тихи ситуации, ако е необходимо да се спазват правилата за изграждане на филма, можете да победите ЕДИН оператор, а vikonati се нуждаят от kilka diy. Такъв складов оператор включва редица оператори, vykonuyut nebhіdnі dії. Nadalі skrіz, de zazatimetsya, scho можете да победите един оператор, той може да бъде оператор на склад. Операторите на Okremi в средата на складовия оператор се кремират един по един с буца с буца (раздел. дупе в клауза 5.1.2, представляваща оператора на склада за цикъла). Тъй като крайният складов оператор, думата end не е пълно предложение, тогава не можете да поставите точка пред него, в противен случай компилаторът е наясно, че преди думата end има празен оператор. Възможно е да се разбере какво е тялото на самата програма, за да се постави в началната и крайната операторна дъга, а също и от оператора на склада. 5.2.2. Интелигентен оператор IF Операторът IF реализира алгоритмичната конструкция на ROZVILKA и променя реда на броя на операторите в зависимост от истинността на чибността на текущия ум. Има два варианта на оператора: if S then A else; (re-fork), че ако S тогава A; (shortened fork) В тези оператори: S - deaky логическа virase, чиято истинност е изкривена; A - оператор, който е победител, което е вярно; B е оператор, който е победител, който е viraz S hibniy. Oskilki интелигентен оператор IF е едно предложение, нито преди, нито преди друго, не можете да поставите точка с кого. Приложете варианта на твърдението: ако X< 0 then X:= -Y; if X < 1.5 then Z:= X + Y else Z:= 1.5; Пример. Ввести целое число и вывести символ, соответствующий этому числу в кодировке ASCII, если такой символ есть, или сообщение, что такого символа нет (управляющие символы не учитываются). program EXAMPLE5; var X: Integer; begin Write("Введите целое число: "); ReadLn(X); if (X >31) и (X< 256) then WriteLn("Соответствующий символ - ", Chr(X)) else WriteLn("Такого символа НЕТ") end. 5.2.3. Условный оператор CASE С помощью этого оператора можно выбрать вариант из любого количества вариантов. Структура этого оператора в Turbo Pascal: case S of Cl:<оператор1>; C2:<оператор2>; . . . CN:<операторN>; друго<оператор>край; В тази структура: S - пореден тип, чиято стойност се изчислява; Cl, C2, ..., CN - константи, с които се сравняват стойностите на виразата S;<оператор1>, <оператор2>, ..., <операторN>- Оператори, от които стойността на S се разминава;<оператор>- оператор, който печели, тъй като стойността на виразата S не съвпада със същите константи C1, ..., CN. Главата на оператора else не е език. Ако в случая на S няма стойност, която не съответства на нито една от константите, целият оператор се приема като празен. В горната част на оператора IF можете да поставите точка преди думата else. Що се отнася до броя на константите, е необходимо да изберете един и същ оператор, те могат да бъдат прекарани през кома (или да се посочи диапазон, ако е възможно), като ги придружава с един оператор. дупето. случай I от 0,2,4,6,8: WriteLn("двойна цифра"); 1,3,5,7,9: WriteLn("Несдвоена цифра"); 10..100: WriteLn("Число от 10 до 100"); else WriteLnC"Отрицателно число или по-голямо от 100") край; Прикладът на избора на оператора CASE също е посочен в клауза 16.3.21. 5.2.4. Операторът за цикъл REPEAT Операторът за цикъл REPEAT организира цикъл за цикъл, без значение колко оператора, с неизвестен брой повторения. Тялото на цикъла побеждава само веднъж. Излизането от цикъла се изпълнява, ако текущият логически израз е true. Структура на това твърдение: повторете<Оператор1>; <Оператор2>; . . . <ОператорN>; до S; В моята структура:<Оператор1>; <Оператор2>; <ОператорN>- vikonuvanі оператори, scho за установяване на тялото на цикъла; S - логическа вираза, чиято истинност се проверява чрез итерация на кожата. Частите на думата repeat и до є със собствени операторни дъги, точка след която преди думата до не е задължителна. дупето. Програмата е подобрена, така че се изчислява сборът от две числа (раздел. чел. стр. 2). програма ПРИМЕР6; var X, Y, Sum: Real; Ch: Char; начало на повторение (началото на цикъла) Write("Въведете числа X и Y"); Четене Ln(X, Y); Сума:=X+Y; WriteLn("Сборът от числа X и Y е добър",Sum); Write("Прекратяване на програмата?"); Четене Ln(Ch); до края (UpCase(Ch) = "Y") или (Ch = "д") или (Ch = "Д") (функция UpCase - завъртете главната буква по подходящ начин.). 5.2.5. Операторът на цикъла WHILE Операторът на цикъла WHILE организира изпълнението на един оператор, без значение колко пъти. Излезте от цикъла zdіysnyuєtsya, сякаш е логично виразът да се появи hibnim. Същностите на истината на логическото разсъждение са изкривени върху кочана на итерацията на кожата (колкото по-рано, по-ниско е бито тялото), тялото на цикъла може да бъде бито през всеки друг път. Структурата на оператора на цикъла може да се види: while S do<Оператор>; В тази структура: S - логическа вираза, чиято истинност се тества върху кочана на итерацията на кожата;<Оператор>- Обвиване на операторски цикъл. дупето. Намерете всички дилници на положително цяло число (crim 1 на самото число). програма ПРИМЕР7; varX:Цяло число; Половина: цяло число; Делител: цяло число; i: цяло число; start repeat Write ("Въведете число, по-голямо от нула: "); Прочетете Ln(X); ако X<= 0 then WriteLn("Неправильный ввод") until X >0; Половина:= X div 2; Разделител:=2; i:= 0; докато Разделител<= Half do begin if X mod Divider = 0 then begin Inc(i); {увеличение счетчика на единицу} WriteLn(i, " -и делитель равен; ", Divider) end ; Inc(Divider) {увеличение делителя на единицу} end; if i = 0 then WriteLn("Делителей нет"); WriteLn("Конец решения") end . 5.2.6. Оператор цикла FOR Оператор цикла FOR организует выполнение одного оператора заранее известное число раз. Существует два варианта оператора: for <переменная цикла>:=<начальное значение>да се<конечное значение>направи<оператор>; за<переменная цикла>:=<начальное значение>надолу към<конечное значение>направи<оператор>; За тези оператори:<переменая цикла>- Промяна на пореден тип;<начальное значение>- Viraz (пореден тип), който показва стойността на цикъла на промяна;<конечное значение>- Viraz (пореден тип), който показва последната стойност на цикъла на промяна (със същата стойност на цикъла<оператор>) vikonuetsya покачване);<оператор>- Лош оператор.<начальное значение>і<конечное значение>дължими, но и суми за прехвърляне от цикъла на смяна (разд. стр. 9.3). Цикълът се прави в този ред: - На първо място, те са преброени и забравени, а последните значения. - Dali zmіnnoї цикъл naєtsya pochatkovo znachennya. - След това стойността на цикъла на промяна се сравнява с крайните стойности. Освен това, докато параметърът на цикъла е по-малък или равен на крайната стойност (в първата версия на оператора) или повече или повече равен на крайната стойност (в другата версия), последната итерация се преодолява; в противен случай трябва да напуснете цикъла. Итерацията на Vikonannya chergovoi включва гърба на vikonannya<оператора>, а след това - давайки на цикъла на промяна обидна по-голяма стойност (за първата версия на оператора) или обидна по-малка стойност (за другата версия). Звичайно, като в първия вариант<начальное значение>по-ниско<конечное значение>в противен случай другият вариант е по-малко по-нисък<конечное значение>, операторът не е бит веднъж. След излизане от цикъла<переменая цикла>Става невидимо, за намигване през есента, ако изходът от цикъла е създаден с помощта на оператора GOTO или стандартната процедура Break. дупето. Въведете букви от Z до A на екрана, програмирайте ПРИМЕР8; var i: Char; започнете за i:= "Z" надолу "A" до Write(i); WriteLn край. дупето. Изчислете 101 стойности на sin x іz с даден крокодил и въведете преди отрицателната стойност на синуса. програма ПРИМЕР9; етикет 1; var Si: масив от Real; (Масив от реални числа) Стъпка: Real; X: Реален; i: цяло число; begin Write("Въведете термин за изчисление:"); ReadLn(Стъпка); X:=0; (Аргумент Cob) за i:= 0 до 100 започват Si[i]:=Sin(X); X: = X + Край на стъпката; за i:= 0 до 100 направи, ако Si[I]< 0 then begin WriteLn("Первое отрицательное значение синуса: ", Si[i], " Номер элемента: ", i); goto 1; end; WriteLn("Нет отрицательного значения"); 1: end. 5.2.7. Использование стандартных процедур Break и Continue в операторах циклов REPEAT, WHILE и FOR В версии 7.0 в циклах REPEAT, WHILE и FOR можно использовать две стандартные процедуры - Break и Continue. Процедура Break позволяет досрочно выйти из цикла, не дожидаясь выполнения условия выхода. Процедура Continue позволяет начать новую итерацию цикла, даже если предыдущая не завершена. Пример. В массиве целых числел (см. п. 6.1) найти первое отрицательное число и вывести его на экран дисплея. program EXAMPLE10; const N = 10; var Mas: array of Integer; {массив чисел} i: Byte; Yes: Boolean; begin WriteLn ("введите элементы массива"); {ввод чисел} for i:= 1 to N do begin Write ("Mas[", i, " ]= "); ReadLn(Mas[i]) end; Yes:= False; {предположим - число не найдено} for i:= 1 to N do {поиск отрицательного числа} begin if Mas[i] >= 0 след това Продължи; (не отрицателно => следващо число) WriteLn("Отрицателно първо число = ",Mas[i], " Number = ", i); (Намерен брой) Да:= вярно; прекъсване; (Изходен контур) край; ако не е Да, тогава WriteLn("Няма отрицателни числа"); Прочетете край.

складов оператор– последователността от допълнителни програмни оператори, които се намират в операторните дъги – думите начало ... край са запазени. Операторите са последвани от точка;

Част от програмата, която е конкатенирана, може да бъде сгъната от оператор от този вид.

Складов оператор, който да ни обслужва, за да обедини синтактично няколко оператора в един. Tse често е необходим там, де се нуждае от виконат на kilka оператори, ако само един е приемлив. Концепцията за сгънат оператор позволява след помощта на началните и крайните команди да се комбинират няколко оператора и да се разглежда синтаксиса като един оператор. Естеството на операторите, които влизат в склада на оператора, не подлежи на ежедневни граници. Сред тях може да има и други складови оператори.

При различни оператори vikonannya, точка, с която да служи като дистрибутор за двама оператори. Точката след кома преди крайния край може да се снехтуват.

прочетете (i); прочетете (i);

пиша (i); пиша (i)

Обижени записи virnі, oskolki vvazhatimutsya, scho mіzh пишат (i); и end е празен оператор. Празен оператор- оператор, който не наблюдава ежедневните операции и не променя нищо в тези програми. На празен оператор трябва да бъде даден запис в това пространство, където операторът може да бъде според правилата. След нов можете да поставите символ на петна с кома, например:

Програмистите-pochatkivtsiv често обвиняват храната: къде е правилно да поставите знак с точка с кома? Shchob на нов видповисти, зверски към великолепния филм. Между тях се поставя кома, например:

Ако елементите се комбинират в една група, след като са ги поставили при кръглите арки (A, B, C, D), тогава комата трябва да се постави отново между елементите: след комата и преди затваряне на арките, комата е не е посочено. Ако тази група елементи влезе в склада на друга група, тогава трябва да се постави кома между групите, например:

((A, B, C, D), (K, M), E, ​​(X, Y))

Подобна система беше въведена и във филма Pascal, само че в новата роля на кръгли арки ролята играят операторните арки BEGIN - END, вместо Komi постави точка зад нея, а вместо елементи - оператори.

интелигентен оператор

интелигентен оператор позволяват да се помирят deaku umov и в застоя с оглед на резултата от vikonati, че chi іnsu dіyu. С помощта на този оператор са програмирани структурни алгоритми, които се разработват.

Интелигентна операторска структура:

АКО<условие>ТОГАВА<оператор1>ДРУГО<оператор2>,

de IF, THEN, ELSE - запазени думи (yakscho, then іnakshe);

<условие>- Dovіlne vyrazhennya логически тип;

<оператор1>,<оператор2>- be-yak_ филмови оператори.

Зад такъв алгоритъм работи умен оператор. Smart viraz се брои на гърба<условие>. Ако резултатът е TRUE (true), тогава спечелете<оператор1>, но<оператор2>пропуснат; в резултат на това е FALSE (глупости), navpaki,<оператор1>пропусна и vikonuetsya<оператор2>. Например:

x, y, max: реални;

.................

Този интелигентен оператор се чете: когато умният x > max печели, y:= max, в противен случай y:= x.

Част от ELSE<оператор2> интелигентен оператор може да бъде пропуснат. Тогава, ако стойността е ВЯРНА, умственият вирус е спечелен<оператор1>, в противен случай операторът се пропуска.

Като правило, е необходимо да се напише публикация тогава или в противен случай куп оператори, вонята е в рамка от командите начало и край, utvoryuyuchi sim оператор склад. Преди друго никога не поставяйте петно ​​с кома (фрагментите все още не са краят на оператора if).

Мениджър.Нека функцията е зададена

Y=0, така че x<=0

Y=X 3, ако x>0

Напишете програма за изчисляване на стойността на Y за стойността на X.

Програмата може да изглежда така:

програмна задача2; (заглавие на програмата)

var x, y: реално; (Описание на промените)

започвам (кочан на разбитата част)

ако x<= 0 then y:= 0 else y:= x*x*x;

край. (края на победната част)

<Оператор1>і<Оператор2>за vyznachennyam бъде един вид оператор ход, otzhe і umovny.

Мениджър.Нека стойността на Y попада в стойността на X.

Добавете програмата за изчисляване на стойността на Y по стойността на X.

Програма

ако x< 2 then

ако x< 3 then

Доволен съм от Umova x< 2, то y получит значение, равное значению х, это значение затем будет выведено. Если условие х < 2 не удовлетворяется, то значение y будет определено выполнением условного оператора

ако x< 3 then y:= 2 else y:= –x + 5

Yakscho друг ден, а след изявлението then ще бъде добавено отново изявлението if, тогава е виновна неяснотата на интерпретацията на умовете. Тази неяснота е унищожена от офанзивен ранг: било то част от другото, което е било настигнато, което е показателно за частта от тогавашния интелигентен оператор, която е най-близо до него „отгоре“. Накарайте ума да разбере така

ако<условие1>тогава

ако< условие2>тогава

< оператор1>

< оператор2>

Мениджър.Напишете програма за изчисляване на функцията Z

Програма

ако x< 1 then

ако x< 2 then

write('Z=', Z:5:3)

За да видите три решения, две умни if x израза са достатъчни< 1 then Z:= sin(x) else <условный оператор 2>.

<Условный оператор 2>: ако х<2 then Z:= cos(x) else Z:=sin(x)/2.

Следвайте уважението към оператора (било то мислено да наименувате процедурата по този начин по правилния начин), за да видите написаното. В оператора за запис ('Z=', Z:5:3) се дава команда за показване на константата 'Z=' и промяна на Z с формата на дисплея: пет позиции за цялото число, три от тях за дробното част.

Инсталиран софтуер