Оператор for icon

Оператор for



НазваниеОператор for
Дата конвертации11.11.2012
Размер48.18 Kb.
ТипДокументы

Оператор FOR


Цикл FOR – это так называемый цикл с параметром (control variable). Его телом является блок.


Перед самым первым выполнением тела цикла параметру присваивается начальное значение.


Оператор FOR 

FOR параметр:=нач. значение

{TO|DOWNTO} кон.значение

DO блок операторов;


^ Параметр перед каждым выполнением тела сравнивается с конечным значением.


Если мы в операторе FOR поставим ключевое слово TO,

то параметру после каждого выполнения тела цикла будет присваиваться следующее по порядку значение, и цикл будет продолжаться до тех пор, пока параметр не превысит конечное значение.


Цикл For do.


Program Summa;

uses Crt;

Var

i, n, s : Integer;

Begin

ClrScr;

Write ('n = ');

Readln(n);

s:=0;

for i:=1 to n do

s:=s+i;

Write('Summa = ',s);

ReadKey;

End.


Если мы в операторе FOR вместо ключевого слова TO,

поставить DOWNTO (обратите внимание: пишется слитно!), то параметр будет уменьшаться, а цикл завершится, когда при очередной проверке параметр станет меньше конечного значения .


^ Цикл For … downto.

Program Summa;

uses Crt;

Var

i, n, s : Integer;

Begin

ClrScr;

Write ('n = ');

Readln(n);

s:=0;

for i:=10 downto n do

s:=s+i;

Write('Summa = ',s);

ReadKey;

End.


Вложенные циклы :


^ Таблица умножения.


Uses Crt;

const n=9;

var i,j: integer;


begin

cls;

writeln('Таблица умножения');

for i:=1 to n do

begin

for j:=1 to n do

write(i*j:4);

writeln;

end;

end.


Цветной текст на цветном фоне.

// Стандартные CRT-цвета

uses CRT;

var i,j: integer;

begin

for i:=0 to 15 do

begin

TextBackground(i);

for j:=0 to 15 do

begin

TextColor(j);

write(' CRT');

end;

writeln;

end;

end.


^

Оператор WHILE




Оператор WHILE

WHILE логическое выражение DO блок операторов;

 
^ В операторе WHILE телом цикла является блок.


Перед его выполнением каждый раз проверяется значение логического выражения.


Блок, стоящий после DO, выполняется только, если условие истинно. Заметьте, что если условие было ложным до выполнения оператора, то он может не выполниться ни разу. WHILE – так называемый условный оператор цикла. Он может выполняться бесконечно.


^ В следующем примере вычисляется сумма указанного количества вводимых чисел.


PROGRAM  While1;

VAR

    x, s, n: INTEGER;

BEGIN

    write('Введи количество чисел: ');

    readln(n);

    s:= 0;

    WHILE n > 0 DO

        BEGIN

            write('Введите число: ‘);

readln(x);

            s:= s + x;

            n:= n – 1;

        END;

    writeln('Сумма чисел: ', s)

END.

Оператор REPEAT



^ Оператор REPEAT

REPEAT оператор UNTIL логическое выражение;


^ Цикл REPEAT – тоже условный.

Тело в нем – это набор операторов любой величины, количества и уровня вложенности.


Логическое выражение, следующее после ключевого слова UNTIL, проверяется после выполнения тела цикла, то есть оператор выполняется хотя бы один раз.


^ Следующая программа просит и добивается, чтобы было введено положительное число.


РROGRAM Repeat1;

^ VAR

    x: INTEGER;

BEGIN

    REPEAT

        write ('Введите положительное

число: );

        readln(x);

    UNTIL x > 0;

    writeln(' Спасибо !');

END.

Прием, использованный в этой программе, также весьма распространен и часто применяется при вводе, когда необходимо избежать некорректных данных. Такого рода проверки называют защитой «от дурака».


^ Program Summa;

uses Crt;

Var

i, n, s : Integer;

Begin

ClrScr;

Write ('n = ');

Readln(n);

s:=0;

i:=0;

repeat

i:=i+1;

s:=s+i;

until i=n;

Write('Summa = ',s);

ReadKey;

End.


Домашнее задание 18 ноября :


Повторить операторы цикла и написать программы :


1. Написать программу с использованием цикла For to do. Нарисовать блок-схему.

Температура С в градусах Цельсия изменяется от 0 до 100 с шагом 5. Напечатать таблицу перевода температуры из градусов Цельсия в градусы Фаренгейта (F). Формула перевода: F = 1,8 C + 32. Составьте блок-схему и программу решения задачи.


2. Написать программу с использованием цикла while do Нарисовать блок-схему.

Составьте таблицу значений функции y = 5x – 2 на отрезке [1; 20]  с шагом b = 2.


3. Написать программу с использованием цикла repeat until. Нарисовать блок-схему.

  1. В первый день пловец проплыл 3 км. В каждый следующий день он проплывал на 10% больше, чем в предыдущий.

    • а) В какой по счету день пловец начнет проплывать более 5 км?

    • б) К какому дню он суммарно проплывет более 30 км?


Дополнительные задания.


  1. Программа генерирует случайным образом 10 чисел. Вычислить разность между максимальным и минимальным из них.

  2. Программа генерирует случайным образом 20 чисел. Потом определяет образует ли они возрастающую последовательность.

  3. Программа генерирует случайным образом пятизначное число и находит сумму цифр этого числа.

  4. Программа запрашивает шестизначное число и выясняет – является ли оно палиандромом, т.е. таким, десятичная запись которого читается одинаково слева направо и справа налево.




Похожие:

Оператор for iconУсловный оператор if и оператор выбора case задача №1
Переменная ао хранит код одной из операций ‘+’, ‘-’, ‘*’, ‘/’. В зависимости от значения ао следует произвести следующую операцию...
Оператор for iconУсловный оператор
В каких случаях в программе используется неполный условный оператор? Как он оформляется? Как он работает (что происходит при его...
Оператор for iconОператор автоматизированных и полуавтоматизированных линий общая характеристика профессии
Работа, как правило, в помещении, в производственном цеху. Линии, изготавливающие сырье и элементы конструкций для строительства,...
Оператор for iconОператор цикла с последующим условием (с постусловием)
Если заранее неизвестно количество повторений или шаг изменения параметра цикла отличен от 1 или –1, то можно использовать оператор...
Оператор for iconСогласовано утверждаю председатель профкома директор школы Л. М. Буркова Л. П. Ковешникова приказ № от 2011г Должностная инструкция оператора киасуо моу пойловская сош №21
Оператор школьной информационной автоматизированной системы управления образованием (далее оператор киасуо) назначается и освобождается...
Оператор for iconДокументи
1. /лекции, учебные работы, алгоритмы/Access/Учебное пособие по Базам данных Access.doc
Оператор for iconМобiльний оператор

Оператор for iconОператор условного перехода

Оператор for iconЗадачи на оператор множественного выбора Case of

Оператор for iconОператор персональных данных
Моу лсош№2
Оператор for iconВ. Г. Белинского Султанов А. Я. Дополнительные вопросы алгебры. Оператор конечной разности Учебно-методическое пособие
Султанов, А. Я. Дополнительные вопросы алгебры. Оператор конечной разности: Учебно-методическое пособие / А. Я. Султанов. Пенза,...
Разместите кнопку на своём сайте:
Документы


База данных защищена авторским правом ©lib.podelise.ru 2000-2014
При копировании материала обязательно указание активной ссылки открытой для индексации.
обратиться к администрации
Документы

Разработка сайта — Веб студия Адаманов