МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ

ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ

НИЖЕГОРОДСКИЙ ГОСУДАРСТВЕННЫЙ ПЕДАГОГИЧЕСКИЙ УНИВЕРСИТЕТ

Хлыбов а.А., Хлыбова о.Н. Информатика

Учебно-методическое пособие

к изучению курса

Нижний Новгород

2008

Печатается по решению редакционно-издательского совета НГПУ

Хлыбов А.А.

Хлыбова О.Н.

Информатика. Учебно-методическое пособие.

Н. Новгород: НГПУ, 2008. – 44с.

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

Отв. редактор: канд. техн. наук, доц Н.О.Рябина

Рецензент к.т.н., зав каф. Машиноведения и ИТ Рябина Н.О.

© Хлыбов А.А.

Хлыбова О.Н., 2008

© НГПУ, 2008

Содержание Введение

Настоящее учебно-методическое пособие представляет собой пособие по курсу «Информатика» и содержит руководство к выполнению практических работ на языке программирования «Паскаль».

Пособие предназначено для студентов 1-го курса дневного и вечернего обучения технолого-экономического факультета НГПУ, обучающихся по специальности «- Социокультурный сервис и туризм».

Цель курса: подготовить специалиста, владеющего современными методами обработки данных.

Задачи курса:

1. Обеспечить теоретическую подготовку для решения прикладных задач.

2. Развивать практические навыки программирования.

3. Развивать логическое мышление.

В процессе изучения курса у студентов формируются:

• умение формулировать задачи;

• необходимые навыки составления алгоритмов;

• развиваются умения систематизировать и анализировать.

Одним из путей решения поставленных задач является выполнение практических работ, описанных в данном пособии. Каждая работа содержит теоретический материал, примеры выполнения заданий и сами задания.

Список литературы позволяет более детально изучить материал.

Практическая работа 1. Ветвление

Паскаль – язык структурного программирования. Реализация последовательности действий (т.е. структуры следования) выполняется с помощью составного оператора:

Begin <последовательность операторов> end

Раздел операторов в программе всегда является составным оператором. Служебные слова begin и end называют операторными скобками.

Имеются две встроенные процедуры (подпрограммы) ввода:

1). Read(<список переменных>);

2). Readln(<список переменных>).

и две процедуры вывода на экран:

1). write(<список выражений>);

2). writeln(<список выражений>).

Для вывода на принтер используются те же процедуры с добавлением служебного слова lst перед списком выражений.

Пример: write(lst, ‘нет решений’);

На бумаге будет напечатан текст «нет решений».

Структура Ветвление или Развилка обеспечивает выбор одной из двух альтернатив:

если < условие 1 > то

    < действие 1 >

иначе

     < действие 2 >

все

Существует сокращенная форма структуры Ветвление, которая позволяет выполнить действие или пропустить его:

если < условие > то

    < действие >

все

Обобщением структуры Ветвление является Множественный выбор:

если Var = Const1 то < действие 1 >

если Var = Const2 то < действие 2 >

. . .

если Var = ConstN то < действие N >

все

В зависимости от значения переменной Var выполняется одно из указанных действий, например, если Var = Const3, то выполняется

< действие 3 >.

Для реализации ветвления (развилки) в Паскале предусмотрены два оператора условный оператор и оператор выбора (варианта). Они предназначены для выделения из составляющих их операторов одного, который и выполняется.

Условный оператор

Структура и действие условного оператора:

if <логическое выражение>

then <оператор 1>

else <оператор 2>

Условный оператор может быть неполным, т.е. не содержать часть «else <оператор 2>». Это используется тогда, когда нужно выполнить всего одно условие и не делать ничего, если оно не верно. В таком случае после действия, указанного за словом Then ставиться ";".

1. Составим программу, которая определяет длину общей части двух отрезков числовой оси, заданных координатами своих концов соответственно a,b и c,d (a<b, c<d). Если отрезки имеют общую часть, то левая координата общей части отрезков m равна максимальному из чисел a и c, а правая n – минимальному из чисел b и d.

Алгоритм Структура_с_ветвлением

Начало

ввод (a,b, c,d)

если (a<c) то m:=c иначе m:=a

если (b<d) то n:=b иначе n:=d

если m<n то l:=n-m иначе l:=0

все

вывод (l )

Конец

Программа 1. Определение длины общей части двух отрезков.

program cros;

var a,b,c,d,m,n,l:real;

begin

writeln(‘введите координаты концов отрезков’);

read (a,b,c,d);

writeln;

if a<c then m:=c else m:=a;

if b<d then n:=b else n:=d;

if m<n then l:=n-m else l:=0;

writeln (‘длина общей части отрезков=’,1:6:2)

end.

Оператор выбора имеет форму:

case <выражение> of

<список констант 1>:<оператор 1>

< список констант 2>:< оператор 2>

………………

< список констант N>:< оператор N>

end.

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

Оператор выбора вычисляет значение выражения, записанного после case. Если его значение совпадает с одной из констант в некотором списке, то выполняется оператор, стоящий после этого списка. Если значение выражения не совпало ни с одной из констант во всех вариантах, то оператор варианта ничего не делает.

2. В зависимости от номера месяца выдать сообщение о времени года.

Алгоритм Оператор_выбора

Начало

ввод (k)

выбор из списка: 1, 2, 12; то вывод «зима»

выбор из списка: 3,4,5 то вывод «весна»

выбор из списка: 6,7,8, то вывод «лето»

выбор из списка: 9,10,11, то вывод «осень»

Конец

Программа 2.

program seasons;

var k:=integer;

begin

writeln (‘’)

readln(k);

case k of

1,2,12:writeln(‘зима’);

3,4,5:writeln(‘весна’);

6,7,8:writeln(‘лето’);

9,10,11:writeln(‘осень’)

end

end.