87894

Програми циклічної структури

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

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

Мета: Закріплення знань про програми циклічної структури, складання програм та робота з нею. Індивідуальне завдання №5 Умова : Скласти 3 варіанта програм циклічної структури типа for, while та repeat, зробити компіляцію, ввести вхідні данні, порівняти результати.

Украинкский

2015-04-24

25.71 KB

0 чел.

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

НАЦІОНАЛЬНИЙ ТЕХНІЧНИЙ УНІВЕРСИТЕТ

“ХАРКІВСЬКИЙ ПОЛІТЕХНІЧНИЙ ІНСТИТУТ”

Кафедра: “Інформатика та інтелектуальна власність”




ЗВІТ

з лабораторної роботи №3

тема: “ Програми циклічної структури

Дисципліна: “Структури та організація даних ЕОМ”





Виконав: студ. гр. КІТ-64

Кабанин А.В.

Перівірив: к.т.н., ас. каф. ІІВ

Бурцев М.В.

                                                                                                                     Поворознюк О.С.



Харків 2014

Лабораторна робота №3

Тема:  «Програми циклічної структури»

Мета: Закріплення знань про програми циклічної структури, складання програм та робота з нею.

Індивідуальне завдання №5

Умова : Скласти 3 варіанта програм циклічної структури типа for, while та repeat, зробити компіляцію, ввести вхідні данні, порівняти результати.

Формула:   

Текст програми типа for:

Program lab_3_1;

 var n,i,x : integer;

   s: real;

 begin

  WriteLn('Введите число');

  readln(n);

  s:=0;  x:=1;

  for i:=1 to n do

   begin

    s:=8/(16+sqr(x))+s;

    x:=x+1;

   end;

  writeLn('Сума ряду з ',n,' елементов ровняется ',s);

 end.

Текст програми типа while:

Program lab_3_2;

 var n,i,x : integer;

   s: real;

 begin

  WriteLn('Введите число');

  readln(n);

  s:=0;  i:=1;  x:=1;

  While i<=n do

   begin

     s:=8/(16+sqr(x))+s;

     i:=i+1;   x:=x+1;

   end;

  writeLn('Сума ряду з ',n,' елементов ровняется ',s);

  end.

Текст програми типа repeat:

Program lab_3_3;

  var n,i,x : integer;

   s: real;

 begin

  WriteLn('Введите число');

  readln(n);

  s:=0;  I:=0;  x:=1;

   begin

    repeat

    S:=8/(16+sqr(x))+s;

    I:=i+1;   x:=x+1;

    until I>=n;

   end;

  writeLn('Сума ряду з ',n,' елементов ровняется ',s);

 end.

Результат роботи програм:

Розрахунок формули    в програмі турбо Паскаль  3 методами: for, while та repeat.

Висновки

На лабораторній роботі №3 я  закріпив знання про програми циклічної структури. Навчився складати програми на основі закріплених знань.


 

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

49402. Устройство сбора телеметрической информации c оценкой измеряемой величины 247 KB
  Конструктивная реализация устройства включает в себя ряд коммутаторов с подключенными к ним дешифраторами аналоговоцифровой преобразователь АЦП и микропроцессорный блок включающий в себя сам микропроцессор тактовый генератор и память ПЗУ и ОЗУ. Описание работы схемы Чтобы считать с определенного датчика сигнал необходимо выбрать коммутатор его канал и запустить АЦП. Из ША разряды А1 А2 А3 и А4 поступают на коммутаторы К1К63 которые снимают показания датчиков затем сигнал поступает на коммутаторы К64К67 которые выбирают какой из...
49403. Устройство селекции ВИК 170 KB
  В работе выполнена разработка структурной схемы алгоритма работы устройства программного обеспечения а также приведен расчет требуемой памяти. Задачи решаемые современными устройствами постоянно усложняются. Перспективными представляются селектирующие устройства на микропроцессорах. Преимуществами таких устройств является возможность накопления информации от различных источников в регистрах общего назначения РОНАХ и их анализа согласно выбранным критериям осуществление оперативной настройки на различные коды без существенного...
49404. Разработка тренинга командообразования 564.65 KB
  Осуществить теоретический анализ понятий команда, командообразование; рассмотреть основные сферы деятельности команд; определить принципы организации командной формы работы; рассмотреть основные технологии психологического тренинга; выделить основные виды, парадигмы тренинга
49408. Устройство формирования импульсных последовательностей на базе МПС 374 KB
  Система состоит из микропроцессора таймера тактового генератора блока памяти. ВМ выбор микросхемы ЗП вход для записи данных с магистрали данных ЧТ вход разрешения выдачи данных из таймера на ШД ТИ0.ТИ2 тактовые входы каналов таймера Р0. 0й канал 1го таймера запрограммирован на работу в режиме 5 схемотехнически управляемый строб.
49409. Устройство сбора телеметрической информации 713 KB
  Конструктивная реализация устройства включает в себя 30 модулей аналогового ввода с подключенными к ним дешифраторами, основной микроконтроллерный модуль, включающий в себя микроконтроллер, а так же при необходимости и дополнительную память (ОЗУ).
49410. Разработка процесса разделения углеводородной смеси 175 KB
  Задание на курсовое проектирование Дисциплина: Основы проектирования и оборудование предприятий органического синтеза Студент: Новокрещенова Наталья Сергеевна Тема: Разработка технологического процесса для разделения углеводородной смеси заданного состава Исходные данные: 1. В результате чего выходящие из аппарата пары представляют собой почти чистый НК. Часть конденсата возвращаемая на орошение аппарата называется флегмой другая часть отводится в качестве дистиллята. Она заключается в конденсации газов и последующей ректификации...