ЗА контур оператор, известен като отчета за цикъл с параметър е, както следва:

Когато това се изпълнява оператор на първо място, изчислява някаква начална стойност на А, който се присвоява на променлива I, моята наречения цикъл параметър. След това изчислява крайната стойност на В и про-провери дали I уравнение = V. Ако няма равенство, В процес S, който може да бъде неразделна оператор и променливата аз оттеглих Chiva-единица. След тази проверка (дали параметърът не е равна на крайната стойност), промени оператора изпълнение S и повишена I-солна единица циклично извършват, докато, докато е-уравнение I = V. Параметър цикъл I, и началната и крайната znĂ сечение на (А и В) могат да принадлежат към всеки тип цел (например, цяло число или въглен). (В същото време всички те трябва да са от същия тип.) Ако началната стойност е по-голяма от или равна на крайната стойност на самостоятелно начало, S нито един оператор ще се изпълнява само веднъж.

Както се използва тук, резервираните думи за, ДА и не IME изчакване смисъл от. и да извърши това.

ЗА изявление линия тя има функциите:

• тялото на цикъла е забранено изрично промените параметър цикъл (като се използва оператора на прехвърляне, например);

• Завършването на линия ЗА оператор, стойността на параметъра

(I) е неопределена. Освен това има и друга форма на оператор цикъл с опция:

Тук, за извършване на оператора S, първоначалната стойност на A трябва да надвишава стойността Б. окончателен Освен това, в този случай, параметъра, който с всеки цикъл се намалява с една, докато не стане равен на V. крайна стойност

Оператор цикъл с параметър, за да се използва, когато на-преди известно е, как трябва да се направи много време тялото на цикъла.

Ето примери за оператора на цикъл с опция:

за I: = л до 5 х правят: = пл (х);

за I: = Z Downto на пишат (I);

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

Във втория пример, параметърът оператор цикъл се използва за извеждане на латинската азбука в обратен ред (по отношение на Z). Фактът, че Чар е типът на последователност, начало на буквените азбука, че (както Чар тип стойност) се считат за по-малко букви, взети в края на ал-favita. Няма ли, например, погрешно неравенството A<В

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

линия: = л докато линия

за линия = л до п направи writeln

Ако променливата е декларирана Line (виж описание на променливите) като принадлежащи към типа Integer ЗА изявление ще покаже N-ти редовете на гной. Изпълнението на задачите с помощта на отчет на дружеството за е по-просто, защото не е необходимо да се подредят оператори за присвояване: = л и линията: = линия + 1.

Primer№4. За да се покаже 20 реда със символи ********************

Var, N, и: цяло число;

Наберете номер от 2 до 10 и дава отговор под формата на степен влезе число от 2 до 10. Например:

"2,00 на силата на 2 равно на 4.00

2.00 до 8.00 градуса равни на 3

2.00 в 10 степен е 1024. "

Един пример за тази програма.

Пример вид повторение на цикъла. до. Определя се броят на N, при което сумата от квадратите на естествени числа от 1 до п не може да надвишава стойността К, вписани от клавиатурата. Това означава, че

програма sum_sq; използва CRT; Var К, S, N. цяло число; започнем clrscr; writeln ( 'Enter K'); readln (к); S: = 0; п: = 1; повтаря S: = S + Н * п; п: = п + 1; докато е> к; writeln ( "N = ', N 3," S = е 5 ...); край.

Изчисляване на първите 20 условията на последователността на Фибоначи chesel:
u1 = 1; u2 = 2; ф (п) = ф (п-1) + U (п-2), и стойността на Golden раздел V на (п) = ф (п) / у (п-1)

конст Nmax = 20; Var I: цяло число; U1, U2, U3: цяло число; V: реален; beginu1: = 1; u2: = 2 об: = u2 / u1; writeln ( "U (1) = ', U1); writeln (" U (2) =', U2, "V (2) = ' V: 2: 2), защото: = 3 до Nmax направи започне u2: = U2 + u1; u1: = u2-u1; V: = u2 / u1; writeln ( "U (" I ") = ', U2," V ( "I") =', о: 2: 2); край; readln; край. Primer№5 конст Nmax = 20; функция ПИБ (п: число): число; beginif (п = 1), след това започва ПИБ: = 1; изход; край, ако (п = 2), след което започва ПИБ: = 2; изход; край; ПИБ: = ПИБ (п -1) + ПИБ (п-2); край; функция sech (п: число): реално; beginsech: = ПИБ (п) / ПИБ (п-1); край; Var I: цяло число; beginwriteln ( "U (1) = ', ПИБ (1)), защото: = 2 до Nmax направи writeln (" U ( "I") =', ПИБ (I), "V (", т.е., ") = ', sech (I): 2: 2); readln; край.

Клавиатура вход са положителни числа п, р и. Създаване на програма за изчисляване на предварително определен брой членове на н на последователност, а, б. Посочете получените стойности.

Решение. Ние използваме променлива мощност (мощност) за изчисляване на функцията мощност на п; променлива степен (индекс) за изчисляване на експоненциалната функция и променлив фактор (множител) за факторен п !.
Програми се състоят от:
• Блокиране на описания, който определя използвани модули, използвани променливи и техните видове;
• Органите на програмата, включително;
- почистване на екрана;
- клавиатура вход данни;
- изчисляване на елементи в последователност от рекурсия отношения, изходните стойности на променливите са, както следва:
мощност = 1, експонента = 1, фактор = 1,
формулата за общ план
poweri = poweri-11 • п
exponenti = exponenti-11 • п,
factori = factori-11 • аз;
- показване на резултатите на екрана.
програми променливи п, р и - число тип цяло число (за неотрицателни цели числа в границите от промени от 0 до 32 767); променлива мощност, експонат, фактор - реални числа с най-малко 6-7 истинските признаци след точката (за положителните числа в допустимия диапазон за вида, като например 1,4 • (10 -45), за да 3,4 • (10 38) ). Използвани типове данни се наричат ​​единични, реално, поплавък на езиците, Basic, Pascal, C, съответно. Когато продукцията на променлива извън декларирания тип кръг се появява на грешката при препълване (преливане).
Форматирания изход резултати от всички програми на един и същ език за програмиране като пример, където п = 10, р = 3, а = 3. В момента има: п = ю = 1000 и = 3 * 10 = 59 049, б. == 10! = 3,628,800.

Бъдете Primer№7 изчисление програма н !.

Var п, I, Р: цяло число;

за I: = 1 до п направи р: = p∋i;

Без да се използват стандартни функции (с изключение на ABS), изчислени с точността на 0.0001 функция у = е (х). Той приема, че необходимата точност се постига, ако следващия мандат в абсолютна стойност по-малко от 0,0001, следващи условия вече не могат да бъдат взети под внимание. Олово и стойността на у което се намери с помощта на стандартни функции.

Var X, Y, п, ф: реален;

до корема (ф) <0.0001;

напиши ( "получава у = ', Y: 2, 4," стандартни х =', COS (х))

Var X, Y, п, ф: реален;

докато корема (ф)> = 0.0001 правя

напиши ( "получен х = ', х: 8: (х) 4' стандартни X =", защото: 8: 4)

Като се има предвид не е празна поредица от реални положителни числа, за

последвано от отрицателно число. Създаване на програма за пресмятане

средното аритметично на тези числа.

Var х, е: реално; п: цяло число;

напиши ( "х", п + 1 "="); readln (х);

напиши ( "ср. аритметична. = ', S / N)

Var х, е: реално; п: цяло число;

а х> = 0 задачи

напиши ( "х", п + 1 "="); readln (х)

напиши ( "ср. аритметична. = ', S / N)

Като се има предвид една п> 0. Напишете програма, която отпечатва всички прости числа от

Var п, т, к, стр: цяло число;

за m: = 2 до п направи

за к: = 2 до TRUNC (SQRT (т)) направи

ако m мод к = 0, тогава р: = 1;

ако п = 0, тогава напиши (т, '')

Var п, т, к: цяло число;

за m: = 2 до п направи

за к: = 2 до TRUNC (SQRT (т)) направи

ако m мод к = 0, тогава Иди 1;

Var п, т, к: цяло число; т: булева;

напиши ( "п = '); readlln (п);

за m: = 2 до п направи

докато т или (к> = TRUNC (SQRT (т));

ако не т след напиши (т, '')

Полезни неща? Споделете това:

Не намерихте това, което търсите? Google да Ви помогнем!

Page генерирана за: 0.023 сек.

Свързани статии