37643

Дослідження типів, що визначаються, в мові Паскаль (інтервальний, перечислювальний, множинний)

Лабораторная работа

Информатика, кибернетика и программирование

Написати програму на мові Паскаль яка складається з наступних дій: Опису перечислювального типу згідно з варіантом завдання. Опису трьох інтервальних типів на основі перечислювального типу. Опису та ініціювання двох змінних різних інтервальних типів. Написати програму на мові Паскаль яка складається з наступних дій: Опису перечислювального типу згідно з варіантом завдання.

Украинкский

2013-09-24

19.02 KB

3 чел.

МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ

Національний авіаційний університет

Кафедра комп’ютерних інформаційних технологій

Лабораторна робота 3.2

З дисципліни: Основи програмування та алгоритмічні мови

На тему: Дослідження типів, що визначаються, в мові Паскаль (інтервальний, перечислювальний, множинний)

Виконав:

студент групи ФКН-101

Лілянов В.С.

Перевірив:

Скалова В.А.

Київ-2010

ЛАБОРАТОРНА РОБОТА 3.2

ДОСЛІДЖЕННЯ ТИПІВ, ЩО ВИЗНАЧАЮТЬСЯ, В МОВІ ПАСКАЛЬ (ІНТЕРВАЛЬНИЙ, ПЕРЕЧИСЛЮВАЛЬНИЙ, МНОЖИННИЙ)

Завдання 1.

Написати програму на мові Паскаль, яка складається з наступних дій:

  1.  Опису перечислювального типу згідно з варіантом завдання.
  2.  Опису трьох інтервальних типів на основі перечислювального типу.
  3.  Визначення атрибутів інтервальних типів, використовуючи базові операції.
  4.  Опису та ініціювання двох змінних різних інтервальних типів.
  5.  Визначення максимальної змінної.

Завдання 2.

Написати програму на мові Паскаль, яка складається з наступних дій:

  1.  Опису перечислювального типу згідно з варіантом завдання.
  2.  Опису множинного типу на основі перечислювального типу.
  3.  Опису трьох множин згідно з варіантом завдання.
  4.  Знайти множину, що складається з елементів, які одночасно входять і до 1-ї  і до 2-ї множини (операція пересікання).
  5.  Знайти множину, що складається з всіх елементів, які входять до 2-ї та 3-ї множини (операція об’єднання).
  6.  Знайти множину, що складається з елементів 1-ї множини, які не входять до 3-ї множини (операція віднімання).
  7.  Визначити чи є 3-тя множина надмножиною 2-ї множини (операція відношення).
  8.  Визначити чи є такі елементи множинного типу, які одночасно входять до всіх множин (операція входження in).

Код програми 1:

program laba3_2;

type

transport=(tanker,kater,katamaran,avtobus,poizd,troleybus,litak,derijabl,deltaplan);

voda=tanker..katamaran;

zemlya=avtobus..troleybus;

povitrya=litak..deltaplan;

var

v:voda;

z:zemlya;

p:povitrya;

t:transport;

begin

v:=high(voda);

z:=low(zemlya);

p:=high(povitrya);

if (v>p) then

t:=v else

t:=p;

end.

V=katamaran

Z=avtobus

P=deltaplan   

T =deltaplan

                                                  Код програми 2:

program laba3_2b;

uses crt;

type

kvitu=(roza,senpoliya,barbarus,lipa,zveroboy,evkalipt,iris,liliya,aloe);

kvit=set of kvitu;

const

one: kvit =[roza, senpoliya,barbarus];

two: kvit =[ lipa,zveroboy,evkalipt];

thire: kvit=[ iris,liliya,aloe];

var

a1,a2,a3:boolean;

b1,b3,b4:kvit;b2:kvitu;

begin     clrscr;

b1:=one*two;

b3:=one-thire;

b4:=two+thire;

a2:=one<=thire;

for b2:=roza to aloe do begin

a1:= (b2 in one) and (b2 in two) and (b2 in thire);

if a1=true then a3:=true;end;

writeln('chu e 3 mnojina nadmnojinoyu 2',a2);

writeln('chu e taki elementu yaki vhodyat odnochasno do csih mnojin',a3);

end.

B1=[]

B3=[roza..barbarus]

B4=[lipa..aloe]

A2=false

A3=false

Висновок: дослідили типи, що визначаються в мові Паскаль.


 

А также другие работы, которые могут Вас заинтересовать

14841. Көне түрік жазбаларындағы алғы философиялық ойлар 63 KB
  Көне түрік жазбаларындағы алғы философиялық ойлар Қазақтың ататегі болып табылатын сақтар ғұндар үйсіндердің түп төркіндеріндегі қарамақайшылықтарға қарамастан көшпенділк әмбебапшылығы басымдылыққа ие болды. Солай бола тұра жер өңдеушілерді
14842. ҚАЗАҚ БАТЫРЛАРЫНЫҢ НАНЫМ - СЕНІМДЕРІ МЕН МОРАЛЬДЫҚ ЭТИКАСЫ 50.5 KB
  ҚАЗАҚ БАТЫРЛАРЫНЫҢ НАНЫМ СЕНІМДЕРІ МЕН МОРАЛЬДЫҚ ЭТИКАСЫ С.Г.Есенов Ғылыми жетекшісі: т.ғ.к. Каримов М.К. Семей қаласы М.О.Әуезов атындағы Семей университеті. Қазақтың этноргафиялық суреттерінде кескінделген адам батыр бейнесі негізінен өте қарапайым түрде...
14843. ҚАЗАҚ ӘДЕБИЕТІНДЕГІ ДАНАЛЫҚ ҮРДІС 63.5 KB
  ҚАЗАҚ ӘДЕБИЕТІНДЕГІ ДАНАЛЫҚ ҮРДІС Г.Ә.Өтетілеуова Г.Ә.Мұраталиева Ыбырайым Сүлейменов атындағы № 37 қазақ орта мектебі Тараз қ. Даналық адамды басыбүтін және үнемі баурайтын соңғы лебіз соңғы дау. Даналық өне бойы өткенге көз тастап тарихқа үңілумен болады...
14844. Қазақ философиясы қалыптасуының тарихи ерекшеліктері 48.5 KB
  Қазақ философиясы қалыптасуының тарихи ерекшеліктері Кіріспе бөлімі Әдетте адамдардың барлығы да ізденуші өмірге қажеттінің бәрін өзімен бірге ала келген жоқ. Тарихты адам жасайды адамзат тарихы дегеніміз дарияның асау тасқыны да толқынға қарсы жүзетін кем...
14845. ҚАЗАҚ ФИЛОСОФИЯСЫ ТАРИХЫН ЛОГИКАЛЫҚ-ҚҰРЫЛЫМДЫ КЕСТЕЛЕР АРҚЫЛЫ ОҚЫТУ ӘДІСТЕМЕСІ 79.5 KB
  ҚАЗАҚ ФИЛОСОФИЯСЫ ТАРИХЫН ЛОГИКАЛЫҚҚҰРЫЛЫМДЫ КЕСТЕЛЕР АРҚЫЛЫ ОҚЫТУ ӘДІСТЕМЕСІ Р.Е. Джуншеев Тараз мемлекеттік педагогикалық институты Тараз қ. Философия пәнін оқытуды талдау барысында соңғы кезде академиялық сабақтардың әсіресе практикалық мазмұнында эмп...
14846. Мағжан дүниетанымы 77.5 KB
  Мағжан дүниетанымы Жиырмасыншы ғасырдың басы қазақ философиясының даму тарихы тұрғысынан әлі күнге дейін толық және терең зерттелмеген кезең. Бұл кезеңде әйгілі ақындар мен жазушылардан ғалымдар мен қоғам қайраткерлерінен құралған демократиялық бағыттағы қазақ ...
14847. Махаббат пен ғадауат 71 KB
  Махаббат пен ғадауат Рисала Біздің ұлық Абайымыз айтпаған сөз қалған ба Жасың ұлғайып дүние сырына бұрынғыдан тереңірек үңілген сайын Абайға барып жүгінуің жиілей береді. Жаныңды қинаған сұрақтарға жауап іздейсің. Өлсем орным қара жер сыз болмай ма Өткір...
14848. «Мұтылған» философиясы 38.5 KB
  Мұтылған философиясы Ғарифолла ЕСІМ академик. Шәкәрім өзінеөзі Мұтылған ұмытылған Ғ.Е. деп ат қойған. Біздіңше бұл псевдоним. Мәселенің байыбына барсақ ақынның өзіне осылайша ат қоюында мән бар. Оның дәлелін Мұтылғанның өмірі деген толғауөлеңнен ...
14849. Арифметикалық және геометриялық прогрессия 29 KB
  Арифметикалық және геометриялық прогрессия Ежелгі замандардан бастап адамзат арифметикалық және геометриялық прогрессиялардың заңдылықтарын қолдана білген.Мәселен Біздің заманымызға дейінгі ежелгі вавилондықтардың сына жазу клинопись кестелерінде ежелгі мысы...