Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Информатика1 / МУ лабы инф алгор 2009 ЭЭФ выпущ исправ окт 09.doc
Скачиваний:
18
Добавлен:
25.04.2015
Размер:
1.06 Mб
Скачать

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

Какие логические отношения применяют в Pascal?

Какие функции выполняет оператор безусловного перехода?

Чем отличаются полная и неполная формы оператора ветвления?

Как изображается на блок-схеме оператор условного перехода?

Расскажите о логических функциях and, or.

Какой алгоритм называется ветвящимся?

Какой тип переменных используется для счетчика?

Назначение метки.

Как вы определили количество повторений цикла?

Как программа определяет необходимость повтора цикла?

3 Лабораторная работа 3. Алгоритм с оператором выбора

Цель работы – ознакомление с особенностями программирования алгоритмов разветвленной структуры.

3.1 Создание алгоритма с оператором выбора

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

Заголовок оператора выбора имеет вид: Case “Имя переменной” of. Переменная может быть числовая или символьная. Далее пишут возможные варианты продолжения алгоритма для разных значений переменной.

Ниже приведен фрагмент программы калькулятор, использующей Case.

Metka:

Writeln ('Variant ',i);

Write ('Vvedite 1-e chislo -> '); readln (X1);

Write ('Vvedite matemat deystvie -> '); readln (Znak);

Write ('Vvedite 2-e chislo -> '); readln (X2);

Case Znak of

'+' : Rez:=X1+X2;

'-' : Rez:=X1-X2;

'/' : Rez:=X1/X2;

'*' : Rez:=X1*X2;

else begin Writeln ('Нет такого математического дейтвия! ');

Goto metka; {Защита от неверного ввода символа}

end; { Конец блока else}

end; {Конец оператора Case}

Здесь begin и end после else, указывают блок операторов, которые должны выполняться вместе при неверном вводе символа.

В Case для переменной можно указывать диапазон или перечисление.

Write (' Vvedite god (1700-2000) -> '); Readln (god);

Case god of

1701..1799 : Writeln (' 18 vek');

1801..1899 : Writeln (' 19 vek');

1901..1999 : Writeln (' 20 vek');

1700, 1800, 1900 : Writeln (' Nachalo veka');

2000 : Writeln (' Nachalo nashego veka');

else writeln (' God vne diapazona!');

end;

Обратите внимание на структуру текста программы с уступами, визуально выделяющую блоки операторов.

3.2 Задания и контрольные вопросы

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

На ввод числа 1 вывести надпись «Имя файла Pascal может иметь 8 символов», на ввод числа 2 « Имя файла Word может иметь 256 символов».

Ввести число. На 1 вывести надпись «Имя переменной может иметь 75 символов», на 2 « Имя файла может иметь 8 символов», на 3 «Файлы Pascal имеют расширение pas». Для других чисел вывести «Повторите ввод».

Определить квартал текущего года по вводимому номеру месяца.

Вводится ответ на вопрос "Укажите язык общения: русский (р), английский (а), казахский (к)". Вывести приветствия на этих языках.

Вводится целое число от 1 до 5. Соответственно числу вывести название одной из стандартных программ операционной системы.

Вводится целое число. Если введен ноль, то вывести "неудовлетворительно". Если введены 1, 2, 3 или 4, то вывести "удовлетворительно". Если введены 5, 6 или 7, то вывести "хорошо". Если введены 8 или 9, то вывести "отлично".

На ввод чисел от 1 до 5 вывести текст «В классе … компьютеров».

На ввод чисел от 1 до 4 вывести название схемы топологии локальной сети. 1 - звезда. 2 - кольцо. 3 - магистраль. 4 - смешанная.

На ввод чисел от 1 до 5 вывести название устройства ПК: системный блок, монитор, клавиатура, мышка, стабилизатор.

По вводимому номеру месяца вывести название времени года.

Вывести название месяца, если вводится его номер.

На ввод чисел от 1 до 5 вывести тип файла, который можно создать в Word, из списка: txt, doc, html, rtf, dot.

Вводится год 19 века. По номеру года определить десятилетие. При неверном вводе года вывести надпись «Это не 19 век».

На ввод чисел от 1 до 4 вывести на экран тип файла, создаваемый в графическом редакторе из списка bmp, gif, jpg, npg.

На ввод чисел от 1 до 3 вывести на экран тип исполняемого файла, из списка com, exe, bat. Для других чисел вывести «Повторить ввод».

На ввод чисел от 1 до 5 вывести на экран надпись: «Pascal», «Basic», «Delphi», «C++» или «Fortran». Для других чисел вывести «Повторите ввод».

На ввод чисел 1.. 5 вывести наименования типов данных в Pascal.

На ввод чисел от 1 до 4 вывести цикл For, While, Until, Goto Metka.

На ввод чисел от 1 до 4 вывести название операции «+, -, *, /».

На ввод чисел 2, 8, 10, 16 вывести название системы счисления..

На ввод чисел от 1 до 5 вывести наименование одного из факультетов АИЭС: 1 - ТЭФ, 2 - ЭЭФ, 3 - ФРТС, 4 - ФЗО и ПС, 5 - ФДП.

На ввод 1, 2 или 3 вывести логическую функцию And, Or или Xor.

Соседние файлы в папке Информатика1