Кіріктірілген циклдардың құрылымын ұйымдастыру



Орындаған: Тоқтарғазин Ә. А АУ-401 Тексерген: Жаксыгулова Д. Д
ҚАЗАҚСТАН РЕСПУБЛИКАСЫНЫҢ БІЛІМ ЖӘНЕ ҒЫЛЫМ МИНИСТІРЛІГІ СЕМЕЙ ҚАЛАСЫНЫҢ ШӘКӘРІМ АТЫНДАҒЫ МЕМЛЕКЕТТІК УНИВЕРСИТЕТІ
Автоматика және электротехника кафедрасы
С. Ө. Ж №3

Кіріктірілген циклдардың құрылымын ұйымдастыру. Циклдық алгоритмдерді орындайтын программа құру.
ТР және Си программалау жүйелеріндегі модульдерді салыстыру

.
Циклдарының түрлілігін оңай түсіну үшін, тек айырмашылығы қайталану санын білу, егер солай болса, онда біз арифметикалық цикл ол итерациялық цикл.

цикл while-do-
цикл repeat-until-
цикл шарты бар цикл «деген»
қайталау
Бұл цикл, сондай-ақ итерационно деп аталады. Блок-сұлба цикл
for := to do
for := downto do
істеу
істеу

Итерациялық цикл
Бұл цикл, сондай-ақ алдын ала жағдай бар цикл деп аталады.
while
Бұл цикл шарт ретінде ұзақ болып орындалады.

Бұл цикл ретінде ұзақ шарты жалған болып орындалады. Бойда жағдайы шынайы болып ретінде, цикл, үзіледі. Шарт шын болса, бастапқы цикл бір рет орындалады.
repeat
until
жай-күйі
қайталау

Break және жалғастыру циклы деп аталады.
үзіліс тен кейін ілмектер тоқтатылады және
оператордың келесі циклына бақылау өтеді

Цикл мәлімдемеде жалғастыру
Кейде ішіне басқа бір цикл орындау қажет.
continue
жалғастыру

unituncicl;
{$mode objfpc}{$H+}
interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Spin,
StdCtrls, Buttons;
type
{ TForm1 }
TForm1 = class(TForm)
Button1: TButton;
CheckBox1: TCheckBox;
CheckBox2: TCheckBox;
CheckBox3: TCheckBox;
Edit1: TEdit;
Edit2: TEdit;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
Memo1: TMemo;
SpinEdit1: TSpinEdit;
procedureButton1Click(Sender: TObject) ;
procedureFormCreate(Sender: TObject) ;

private
{ private declarations }
public
{ public declarations }
end;
var
Form1: TForm1;
implementation
{ TForm1 }
procedureTForm1. FormCreate(Sender: TObject) ;
begin
SpinEdit1. Value:=3; // количество членов рядаN
Edit1. text:='0, 1'; // начальное значениеXn
Edit2. text:='2, 0'; // конечное значениеXk
Memo1. Clear;
Memo1. Lines. Add('Лабораторная работа №3 - Циклический алгоритм') ;
end;
procedureTForm1. Button1Click(Sender: TObject) ;
varxn, xk, x, h, an, s, y, al, R, del: extended;
n, k:integer;

Әзірге орындалатын ілмектер мысалында алгоритм құруға тырысамыз.
Бағдарлама үстелінің кіріспесі

Бұл деректер пернетақтадан енгізілуі тиіс не пайдаланушыны көрсету қажет. Бұл бағдарлама желісі үшін
жазу («Enter», санау, - құны ші: ')
Пернетақтадан деректерді енгізу

1 [3, c. 82] арқылы санауышын көбейтпейді. Бұл әрекетті орындау үшін, теріңіз
саны: = + 1 санау;
Өнімнің нәтижесінде мәні қосыңыз. Бұл әрекетті орындау үшін, теріңіз
Бірнеше: = * а Mult;
Нәтижесі жолдар дисплейін қосыңыз. Бұл әрекетті орындау үшін, бағдарламаға жолды қосу
Арнайы жиһаз бен оргтехника ('Сандар өнімі болып табылады: «, Бірнеше) ;

Бағдарламасын іске қосыңыз, 1-ден 5-ке кез келген нөмірін енгізіңіз және нәтиже қараңыз
- Іс жүргізу
- Автоматтандыру, Техника
- Алғашқы әскери дайындық
- Астрономия
- Ауыл шаруашылығы
- Банк ісі
- Бизнесті бағалау
- Биология
- Бухгалтерлік іс
- Валеология
- Ветеринария
- География
- Геология, Геофизика, Геодезия
- Дін
- Ет, сүт, шарап өнімдері
- Жалпы тарих
- Жер кадастрі, Жылжымайтын мүлік
- Журналистика
- Информатика
- Кеден ісі
- Маркетинг
- Математика, Геометрия
- Медицина
- Мемлекеттік басқару
- Менеджмент
- Мұнай, Газ
- Мұрағат ісі
- Мәдениеттану
- ОБЖ (Основы безопасности жизнедеятельности)
- Педагогика
- Полиграфия
- Психология
- Салық
- Саясаттану
- Сақтандыру
- Сертификаттау, стандарттау
- Социология, Демография
- Спорт
- Статистика
- Тілтану, Филология
- Тарихи тұлғалар
- Тау-кен ісі
- Транспорт
- Туризм
- Физика
- Философия
- Халықаралық қатынастар
- Химия
- Экология, Қоршаған ортаны қорғау
- Экономика
- Экономикалық география
- Электротехника
- Қазақстан тарихы
- Қаржы
- Құрылыс
- Құқық, Криминалистика
- Әдебиет
- Өнер, музыка
- Өнеркәсіп, Өндіріс
Қазақ тілінде жазылған рефераттар, курстық жұмыстар, дипломдық жұмыстар бойынша біздің қор #1 болып табылады.

Ақпарат
Қосымша
Email: info@stud.kz