50881

Программирование в Delphi. Разработка программ с ветвлением

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

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

Например: Величина сопротивления равна нулю Ответ правильный Сумма покупки больше 300 рублей В программе условие это выражение логического типа Boolen которое может принимать одно из двух значений: True истина или Flse ложь. Операторы сравнения Оператор Описание Результат сравнения Больше True если первый операнд больше второго иначе Flse Меньше True если первый операнд меньше второго иначе Flse = Равно True если первый операнд равен второму иначе Flse Не равно True если первый операнд не равен второму иначе Flse =...

Русский

2014-02-01

796.5 KB

9 чел.

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

Основы объектно-ориентированного программирования в визуальной среде программирования Delphi.

Тема: Программирование  в Delphi. Разработка программ с ветвлением.

Цель: Продолжить формировать навыки работы в визуальной среде программирования Delphi. Усвоить и отработать применение условного оператора IF и Case.

Теоретические сведения

На практике редко встречаются задачи, алгоритм решения которых является линейным. Часто оказывается, что алгоритм решения даже элементарной задачи не является линейным.

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

В повседневной жизни условие обычно формулируется в виде вопроса, на который можно ответить Да или Нет. Например:

  •  Величина сопротивления равна нулю?
  •  Ответ правильный?
  •  Сумма покупки больше 300 рублей?

В программе условие — это выражение логического типа (Boolean), которое может принимать одно из двух значений: True (истина) или False (ложь).

Простое условие состоит из двух операндов и оператора сравнения. В общем виде условие записывается следующим образом:

Оn1 Оператор On2, где:

  •  On1 и Оп2 — операнды условия, в качестве которых может выступать переменная, константа, функция или выражение;
  •  Оператор — оператор сравнения.

В языке Delphi есть шесть операторов сравнения, которые приведены в табл. 1.

Таблица 1. Операторы сравнения

Оператор

Описание

Результат сравнения

>

Больше

True, если первый операнд больше второго, иначе False

<

Меньше

True, если первый операнд меньше второго, иначе False

=

Равно

True, если первый операнд равен второму, иначе  False

<>

Не равно

True, если первый операнд не равен второму, иначе False

>=

Больше или равно

True, если первый операнд больше или равен второму, иначе False

<=

Меньше или равно

True, если первый операнд меньше или равен второму, иначе False

Из простых условий при помощи логических операторов: and — "логическое И", or -- "логическое ИЛИ" и not - "отрицание" можно строить сложные условия.

В общем виде сложное условие записывается следующим образом:

условие1 оператор условие2, где:

  •  условие1 и условие2 — простые условия (выражения логического типа);
  •  оператор — оператор and или or.

Таблица 2. Выполнение логических операций

Op1

Op2

Opt and Op2

Op1 or Op2

not Op1

False

False

False

False

True

False

True

False

True

True

True

False

False

True

False

True

True

True

True

False

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

В общем виде инструкция if записывается так:

if условие then

begin

// здесь инструкции, которые надо выполнить,

// если условие истинно.

end

else

begin

// здесь инструкции, которые надо выполнить, // если условие ложно. end;

Обратите внимание, что перед else (после end) точка с запятой не ставится.

Порядок выполнения работы

  1.  Загружаем среду программирования Delphi. Пуск ПрограммыBorland DelphiDelphi 7.
  2.  Создадим форму   

  1.  Составляем  блок-схему и программу решения задачи
  2.  Задание №1 Вычислить значение функции

 

Задание №2 Вычислить значение функции

  1.  

  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  

Задание №3 Вычислить значение функции

  1.  

  1.  
  2.  
  3.  
  4.  
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11.  
  12.  

Контрольные вопросы

  1.  Как переводится на русский язык IF?
  2.  Как переводится на русский язык Then?
  3.  Как переводится на русский язык Else?
  4.  Что значит составные условия?
  5.  Как можно очистить поле ввода и область просмотра?
  6.  Приведите синтаксис и опишите действия выполняемые оператором IF?


procedure TForm1.Button2Click(Sender: TObject);

var

x,f:real;

begin

  x:=StrToFloat(Edit1.Text);

  if x=9 Then

  ShowMessage('деление на 0')

  Else

  Begin

     f:=(6*x*x-7)/(9+x);

     Edit2.Text:=FloatToStr(f);

   End;

   Edit2.Text:='';

End;

end.

начало

Ввод х

9-x=0

Деление на 0

да

нет

f

конец

  1.  

 

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

45316. Структура Администрации Президента РФ 21.06 KB
  Президент РФ в целях осуществления своих полномочий создает специальные органы занимающиеся исполнением распоряжений и указов Президента РФ и осуществляющие специальные полномочия. К ним в первую очередь относятся: 1 Администрация Президента РФ; 2 Совет Безопасности РФ. Порядок формирования и компетенция Администрации Президента РФ устанавливается Указом Президента РФ от 25 марта 2004 г. 400 Об Администрации Президента Российской Федерации.
45317. Понятие конституции 24.6 KB
  Правовой статус главы местной администрации. Главой местной администрации может быть не только избираемый населением глава муниципального образования но и так называемый наемный менеджер муниципальный служащий принимаемый на работу по контракту. 37 Закона главой местной администрации может быть лицо назначаемое на должность главы местной администрации по контракту заключаемому по результатам конкурса на замещение указанной должности на срок полномочий определяемый уставом муниципального образования. В этом случае главой муниципального...
45318. Конституция - акт учредительной (верховной) власти 23.87 KB
  Иностранные граждане постоянно или преимущественно проживающие на территории муниципального образования обладают при осуществлении местного самоуправления правами в соответствии с международными договорами Российской Федерации и федеральными законами. на всей территории муниципального образования или на части его территории для выявления мнения населения и его учета при принятии решений органами местного самоуправления и должностными лицами местного самоуправления а также органами государственной власти. В опросе граждан имеют право...
45319. Содержание, форма и основные свойства конституции 25.12 KB
  Правовой статус главы муниципального образования. Закона об общих принципах организации местного самоуправления уставом муниципального образования может быть предусмотрена должность главы муниципального образования выборного должностного лица возглавляющего деятельность по осуществлению местного самоуправления на территории муниципального образования. Глава муниципального образования соединяет в своем правовом и фактическом статусе черты префекта департамента Франции и председателя исполкома местного Совета. Термин глава муниципального...
45320. Механизм защиты Конституции РФ 22.96 KB
  В конституционной практике Российской Федерации давно сложился ряд правовых форм способов защиты Конституции:1 процесс охраны Конституции Президентом Российской Федерации. Во-первых в качестве гаранта федеральной Конституции Президент Российской Федерации который наделяется прерогативами по защите конституционного строя прав и свобод человека и гражданина осуществлению мер по охране суверенитета РФ ее независимости и государственной целостности обеспечению согласованного функционирования органов государственной власти. Суд наделен...
45321. Конституционный строй 19.94 KB
  Одним из ключевых институтов гражданской службы определенных Федеральным законом О государственной гражданской службе Российской Федерации является институт должности гражданской службы. Прохождение гражданской службы возможно только на должности государственной службы. При освобождении от должности и не будучи назначенным на другую должность лицо увольняется с гражданской службы. Должности федеральной государственной гражданской службы учреждаются федеральным законом или указом Президента Российской Федерации должности...
45322. ИНСТИТУТ ОСНОВНЫХ ПРАВ И СВОБОД ЧЕЛОВЕКА И ГРАЖДАНИНА 27.9 KB
  Правовой статус депутата представительного органа мсу Закон об общих принципах организации местного самоуправления развивая нормы Конституции РФ весьма удачно решил проблему политикоправового статуса депутата других членов выборных органов. Представительный орган местного самоуправления состоит из депутатов избираемых на основе всеобщего равного и прямого избирательного права при тайном голосовании п. Известно что в мировой истории становления демократических начал императивный мандат сыграл решающую роль при формировании парламентского...
45323. Конституционно-правовой механизм обеспечения прав и свобод человека и гражданина 19.09 KB
  Основные принципы государственной службы в Российской Федерации. Вопрос о принципах государственной службы является важнейшим в структуре института государственной службы правовой системы не только Российской Федерации но и других стран мира. Термин принципы государственной службы указывает на основополагающие черты сущностные характеристики важнейшее содержание и значение самой государственной службы а также на главнейшие юридические положения в структуре одноименного правового института. Анализируя принципы государственной службы...
45324. Принципы российского федерализма 27.75 KB
  Российская Федерация состоит из республик краев областей городов федерального значения автономной области автономных округов равноправных субъектов Российской Федерации. В составе Российской Федерации в соответствии со ст. Государственная целостность Российской Федерации. Государственная целостность федеративного государства гарантируется тем что государственный суверенитет как верховенство и независимость государственной власти на всей своей территории и в международных отношениях принадлежит только Федерации но...