АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция

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

Читайте также:
  1. Важнейшие черты биосферы. Круговороты веществ и химических элементов в биосфере. Биогеохимические циклы. Функции живого вещества.
  2. Вложенные состояния
  3. Вложенные структуры условных операторов
  4. Вложенные циклы
  5. Операционный и денежный циклы. Принцип оптимизации оборотных активов.
  6. Тепловые двигатели. Термодинамические циклы. Цикл Карно
  7. Что такое вложенные циклы?

Любой цикл, содержащий внутри

Себя один или несколько других

Циклов, называется вложенным.

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

 

Вычислить

 

Схема с блоком модификации:


Program Sum;

Var S, i, j: integer;

BEGIN

S:=0;

FOR i:=1 TO 4 DO

FOR j:=1 TO 3 DO

S:=S + SQR(i + j);

Writeln(‘S=’, S);

END.

GOTOXY(5,12); {Смещение печати}

TEXTCOLOR(4); {Цвет текста}

TEXTBACKGROUND(1); {Цвет фона }

Цвет: 0 - черный, 1 - синий, 2 - зеленый, 3 - голубой

Красный, 5 - Фиолетовый, 6 - коричневый,

Светлосерый, 8 - темносерый, 14 - желтый,

Белый.

 


1 | 2 | 3 |


При использовании материала, поставите ссылку на Студалл.Орг (0.692 сек.)