38114

Составление программ разветвляющейся структуры

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

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

Решить задание в соответствии с вариантом задания. Исходные данные должны вводиться в режиме диалога и сопровождаться комментариями. Результат вывести на экран, сопровождая вывод комментариями. Изучить правила записи операторов ветвления. Разработать алгоритм решения задачи. Составить программу решения задачи.

Русский

2014-10-19

91.5 KB

4 чел.

КОМИТЕТ ПО ОБРАЗОВАНИЮ МОСКОВСКОЙ ОБЛАСТИ

ГОСУДАРСТВЕННОЕ БЮДЖЕТНОЕ ОБРАЗОВАТЕЛЬНОЕ УЧЕРЕЖДЕНИЕ

СРЕДНЕГО ПРОФЕССИОНАЬНОГО ОБРАЗОВАНИЯ МОСКОВСКОЙ ОБЛАСТИ

«СЕРПУХОВСКИЙ ТЕХНИЧЕСКИЙ КОЛЛЕДЖ»

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

По дисциплине «Основы программирования»

Составление программ разветвляющейся структуры

Выполнил:

Студент 2-го курса 2-П гр.

Исаев Валентин

Проверил:

Щербаков Кирилл Вадимович

Серпухов 2014

Цель работы:

  1.  Изучить правила записи операторов ветвления.
  2.  Разработать алгоритм решения задачи.
  3.  Составить программу решения задачи.

Оборудование:

  1.  Персональный компьютер
  2.  программа Turbo Pascal

Задание.

Решить задание в соответствии с вариантом задания. Исходные данные должны вводиться в режиме диалога и сопровождаться комментариями. Результат вывести на экран, сопровождая вывод комментариями.    

1) Даны три числа, определить, является ли сумма каких-либо двух из них положительной.

2) F(x)= -x^2, если x>=7 

   F(x) =2^(-x)/(x*x-9), если x<7               

Блок-схема программы.

1)    

2)

Листинг программы.

1)  Program zd1;

var a,b,c:integer;

begin

writeln('Введите a,b,c');

readln(a,b,c);

if a+b >0 then writeln ('Значение выражения a+b: ',a+b)

else

Writeln ('Значение выражения a+b меньше 0');

if a+c >0 then writeln('Значение выражения a+c: ',a+c)

else

Writeln ('Значение выражения a+c меньше 0');

if b+c >0 then writeln('Значение выражения b+c: ',b+c)

else

Writeln ('Значение выражения b+c меньше 0');

     end.

Результат выполнения программы:

2) Program zd1;

Var x, F : real;

Begin

writeln('Введите x');

readln(x);

if x>=7 then

begin

F:=-x*x;

writeln('F(x)=', F:4:1);

end

else

Begin

    F:=exp(ln(2)*(-x)) /(x*x-9);

writeln('F(x)=', F:4:1);

end;

end.

Результат выполнения программы:

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

  1.  Операторы разветвлений.
  2.  Операторы множественного выбора.
  3.  Форматированный вывод данных.

1) Операторы ветвления.
Ответ: If, then, else.


2) Операторы множественного выбора?
Ответ: Case of.

Если количество разветвлений программы больше 2, то используется оператор варианта case.


3) Форматированный вывод данных.
Ответ: Для удобного чтения выводимых программой данных, в Pascal, реализован форматированный вывод данных. 
Пример: var:a:b, где:
var — выводимая переменная;
a — количество выводимых знаков в целой части числа (избыточные значения будут заполнены пробелами);
b — количество выводимых знаков в дробной части числа.
Также в Pascal возможно использование строковых выражений. Обычно их используют вместе с операторами типа write или writeln. Выводимую строку необходимо заключить в одинарные кавычки. Пример: 'строка'.

Вывод: Изучил правила записи операторов ветвления. Научился разрабатывать алгоритм решения задачи.  Научился составлять программу решения задачи.


Вывод:
b+c<0

Вывод: z

z=b+c

1

b+c>0

Вывод: y

y=a+c

Вывод: а+c<0

Ввод: a,b,c

Начало

x=a+b

1

Вывод: x

Вывод: а+b<0

a+b>0

a+c>0

НАЧАЛО

Ввод:x

Вывод:F(x)

x>=7

F(x)=-x^2

F(x)=2^(-x)/(x*x-9)

Вывод:F(x)

КОНЕЦ

Конец


 

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

37438. Икемділік ұғымы. Сұраныс пен ұсыныс икемділігі 154 KB
  Рыноктық экономика – бұл сұраныс пен ұсыныстың үздіксіз арақатынасы. Мұндай қарым-қатынасты қарапайым моделінің тууы, экономикалық ғылым тарихында үлкен маңызды дәуір болып саналады. Сол мезеттен бері екі ғасырдан астам уақыт өтсе де, рыноктық экономикамен теориялық танысу осыдан басталады. Өйткені осы модель арқылы барлық экономикалық процестер ашылып көрсетіледі.
37439. Финансовый мененджмент 212.87 KB
  Финансовый менеджмент– это управление финансово-хозяйственной деятельностью фирмы на основе использования современных методов. Основным лицом ответственным за достижение цели финансового менеджмента, является вице-президент по финансовым вопросам (заместитель директора по финансовым вопросам).
37440. Обеспечение единства измерений в стране. Государственный метрологический надзор. Цели надзора, сфера распространения. Виды метрологического надзора 19.86 KB
  Проверки проводят должностные лица Госстандарта России - главные государственные инспекторы и государственные инспекторы по обеспечению единства измерений, действующие на соответствующих территориях и аттестованные в установленном порядке.
37441. Виды и средства измерений. Виды эталонов. Стандартные образцы 19.55 KB
  Прямые измерения — это непосредственное сравнение физической величины с ее единицей. Например, при определении длины предмета с помощью линейки происходит сравнение искомой величины (количественного выражения значения длины) с мерой, т. е. единицей измерения.
37442. Факторы, сохраняющие качество товаров 16.91 KB
  Режим хранения - это совокупность условий, при которых товар сохраняет свое качество. Для каждого товара необходим определенный режим хранения, зависящий от его состава и свойств. При правильном режиме не только сохраняется качество, но и снижаются потери товаров.
37443. Потребительские свойства товаров. Общие понятия и номенклатура потребительских свойств 17.07 KB
  Свойства товаров, обусловливающие их пригодность удовлетворять определенные потребности населения и проявляющиеся в процессе эксплуатации или потребления, называют потребительскими. В совокупности потребительские свойства составляют качество.
37444. Оценка качества товаров. Понятие и этапы оценки качества. Градации качества. Несоответствия и дефекты товаров 18.86 KB
  Оценка уровня качества — это совокупность операций, включающая выбор номенклатуры показателей качества оцениваемой продукции, определение значений этих показателей и сопоставление их с базовыми...
37445. Химический состав и свойства товаров 17.78 KB
  Медикобиологические требования к качеству продовольственных товаров — комплекс критериев, определяющих пищевую ценность и безопасность продовольственного сырья и продовольственных товаров.
37446. Сохраняющие факторы: упаковка товаров, транспортирование, хранение 18.84 KB
  Тара в зависимости от функционального назначения подразделяется на потребительскую и транспортную. В потребительскую тару расфасовывают продукцию (банка, бутылка, ампула, туба и др.)