Меню
Разработки
Разработки  /  Информатика  /  Проверочные работы  /  10 класс  /  Лабораторно-практических занятий «Turbo Pascal 7.0»

Лабораторно-практических занятий «Turbo Pascal 7.0»

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

Описание разработки

Карта №1

ТЕМА:      Составление, набор и отладка простейших программ на языке TP.

ЦЕЛИ:      1. Научиться составлять и отлаживать простейшие программы на языке использовать встроенные процедуры ТР 7.0 для имитации движения

                  графических объектов на экране компьютера.

                  2. Составить программы с использованием графических процедур.

ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ:

         Простая программа   состоит из блока описания переменных величин (Var), указания начала программы (Begin - начало), операторов ввода-вывода (Read, ReadLn – читай, Write, WriteLn – пиши), и для завершения в конце программы ставится End с точкой.

ЗАДАЧИ ДЛЯ ПРОГРАММИРОВАНИЯ:

Задание 1. Определите без компьютера и изобразите в тетради (один символ – одна клетка), что напечатает программа:

Uses WinCrt;

Begin

 Write (2004);

 WriteLn (‘        Мы начинаем!’);

 WriteLn (‘6*8=’,6*8);

 WriteLn;

 WriteLn (‘Шестью шесть     ’,     6*6,     ‘Арифметика’, (6+4)*3);

End.

  1. Выполнив задание на бумаге, выполните программу на компьютере и сверьте результаты. Набрав программу, запустите ее  (Ctrl+F9). Если число пробелов не совпадает, проанализируете программу и полученный результат на компьютере и исправьте ошибки в тетради.
  2.  
  3. Добавьте рядом с пустым WriteLn еще один. Что изменилось? Почему?

Задание 2. Население Москвы равняется а=32 000 жителей. Население Нью-Васюков равняется b=1 000 жителей. Допишите программу, которая определяет разницу в числе жителей между этими двумя городами. Используйте переменные величины.

Uses WinCrt;

Var

 a: integer;

 b: integer;

Begin

 Write (‘Введите число жителей Москвы  ‘); ReadLn(a);

? ? ?

WriteLn (‘Разница между городами составляет‘,a-b,’жителей‘);

End.

  1. Набрав программу, запустите ее  (Ctrl+F9).
  2. Измените число пробелов в разных местах последнего WriteLn так, чтобы текст был более читаемым.

Задание 3. Известны размеры спичечной коробки: высота – 12,41см, ширина – 8см, толщина – 5см. Напишите программу вычисления площади основания коробки и ее объем.

Формулы для вычисления: площадь=ширина * толщина, объем= площадь * высота.

Задание 4. Автомобиль 3ч. ехал со скоростью80км/ч и 2ч. со скоростью 90км/ч. Напишите программу вычисления средней скорости автомобиля. Используйте переменные величины и оператор присваивания.

Задание 5. Напишите программу, которая осуществляла бы такой диалог человека с компьютером:

Компьютер выводит на экран:

Здравствуйте, я компьютер, а тебя как зовут?

Человек вводит с клавиатуры:

Коля

Компьютер выводит на экран:

Очень приятно, Коля. Сколько тебе лет?

Человек вводит с клавиатуры:

16

Компьютер выводит на экран:

Ого! Целых 16 лет! Ты уже совсем взрослый!

Программа:

Uses WinCrt;

Var

 name: string;

 vozrast: integer;

Begin

? ? ?

? ? ?

? ? ?

? ? ?

End.

  1. Набрав программу, запустите (Ctrl+F9) и проверьте ее.
  2. Посмотрите как работает программа с другими именами и возрастами. В чем недостаток программы?

Дополнительное задание 1.  Радиус окружности равен 800. Напишите программу вычисления длины окружности и площади круга.

Формулы для вычисления: длина окружности = 2pR, площадь=pR2.  

Где число «пи» =3,1415 и в Паскале обозначается как Pi.

Дополнительное задание 2.  Напишите программу, при которой в компьютер вводятся пусть, пройденный телом, и скорость тела. Необходимо найти время движения тела.

ОТЧЁТ:

Отчет состоит из:

  1. Программ, выполненных на языке программирования Turbo Pascal. Программы должны работать и выводить результат на экран.
  2. Пояснений к программам (если они необходимы), например алгоритмической структуры программы, математических или физических формул используемых при решении т.д.
  3. Ответов на контрольные вопросы к лабораторной работе.

Карта №2

ТЕМА:      Составление и отладка программ с математическими вычислениями.

ЦЕЛИ:      1. Овладеть практическими навыками разработки и программирования вычислительного

                  процесса линейной структуры и навыками по отладке и тестированию программ.

                  2. Освоить работу с математическими вычислениями и функциями в Паскаль.

                  3. Составить программы с использованием встроенных математических функций.

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

  1. Изучить:
  • запись констант, переменных, стандартных функций;
  • правило записи арифметических выражений;
  • арифметический оператор присваивания;
  • организацию простейшего ввода-вывода данных.
  1. Разработать алгоритм решения в соответствии с заданием.
  2. Составить программу решения задачи.
  3. Подготовить тестовый вариант исходных данных и вычислить значения вычисляемых в программе величин.

МЕТОДИЧЕСКИЕ УКАЗАНИЯ:

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

В задании на выполнение лабораторной работы предусматривается значение функции Y(X), определенной совокупностью математический выражений в соответствии с заданными ограничениями на изменение значений аргумента X.

(Полный материал карты в архиве)

Карта №3

ТЕМА:      Составление и отладка программ с условными операторами.

ЦЕЛИ:      1. Научиться использовать условный оператор If…then…else… и оператор выбора

                  Case…of…else… в ходе составления программ.

                  2. Составить программы с использованием этих операторов.

ТЕОРЕТИЧЕСКИЕ СВЕДЕНИЯ:

  1. Инструкция if используется для выбора одного из двух направлений дальнейшего хода программы, а инструкция case используется для выбора одного из нескольких направлений дальнейшего хода программы;
  2. Синтаксисы этих операторов таковы:
    • If <условие> then <истинные инструкции> else <ложные инструкции>;
    • Case <выражение> of

<диапазон значений_1> : <инструкции_1>;

<диапазон значений_2> : <инструкции_2>;

<диапазон значений_N> : <инструкции_N>;

Else <ложные инструкции>; End;

ЗАДАЧИ ДЛЯ ПРОГРАММИРОВАНИЯ:

Пр. 1       Напишите программу для вычисления корней квадратного уравнения.

Задание:

  1. Запустите программу Turbo Pascal.
  2. Наберите программу для вычисления корней квадратного уравнения:

Начало программы:

Program Lab_1_1;

Var

a, b, c : Integer;

x, x1, x2, D : Real;

Begin

Ввод исходных данных

Вычисления дискриминанта: D = b2-4ac

If D>0 then

begin

Writeln(‘D>0 уравнение имеет 2 корня’);

x1:= (-b+Sqrt(D))/(2*a);

x1:= (-b-Sqrt(D))/(2*a);

Writeln(‘x1=’,x1:0:2,’x2’,x2:0:2);

End;

If D=0 then

If D<0 then

End.

  1. Доработайте программу и запустите ее на выполнение (ctrl+F9).
  2. ВНИМАНИЕ! Если при запуске в тексте программы выделяется строка, это значит, что в этой или предыдущей строке допущена ошибка. Исправьте ее и запустите программу снова.

Пр. 2       Напишите программу для вычисления частного от деления 2-х чисел.

Задание:

  1. Откройте новый (чистый) документ Паскаль (File ® New).
  2. Наберите программу и запустите программу на выполнение (ctrl+F9).
  3. Программа должна проверять правильность введенных пользователем данных (делитель не должен быть равен 0) и выводить сообщение об ошибке.

Пр. 3       Напишите программу для вычисления площади кольца (см рисунок).

Задание:

  1. Откройте новый (чистый) документ Паскаль (File ® New).
  2. Наберите программу и запустите программу на выполнение (ctrl+F9).
  3. Программа должна проверять правильность введенных пользователем данных (радиус отверстия Rо не может быть больше радиуса кольца Rк) и выводить сообщение об ошибке.
  4. Используйте формулу: Площадь кольца = площадь круга – площадь отверстия.

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

Задание:

  1. Откройте новый (чистый) документ Паскаль (File ® New).
  2. Наберите программу и запустите программу на выполнение (ctrl+F9).
  3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Вычисление сопротивления электрической цепи.
Введите исходные данные:
Величина первого сопротивления (Ом) —> 15
Величина второго сопротивления (Ом)—> 27.3
Тип соединения (1 - последовательное, 2 - параллельное) —> 2
Сопротивление цепи: 9.68 Ом.

Пр. 5       Напишите программу для вычисления стоимости покупки с учетом скидки. Скидка в 10% предоставляется, если сумма покупки больше 1000 руб.

Задание:

  1. Откройте новый (чистый) документ Паскаль (File ® New).
  2. Наберите программу и запустите программу на выполнение (ctrl+F9).
  3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Вычисление стоимости покупки с учетом скидки.
Введите сумму покупки и нажмите
-> 1200
Вам предоставляется скидка 10%
Сумма покупки с учетом скидки: 1080.00 руб.

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

Задание:

  1. Откройте новый (чистый) документ Паскаль (File ® New).
  2. Наберите программу и запустите программу на выполнение (ctrl+F9).
  3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Введите в одной строке два целых числа
34 67
34 меньше 67.

Пр. 7       Напишите программу которая, выводит пример на умножение двух однозначных чисел, запрашивает ответ пользователя, проверяет его и выводит сообщение "Правильно!" или "Вы ошиблись" и правильный результат.

Задание:

  1. Откройте новый (чистый) документ Паскаль (File ® New).
  2. Наберите программу и запустите программу на выполнение (ctrl+F9).
  3. Ниже представлен рекомендуемый вид экрана во время работы программы:

Сколько будет 6x7?
56

Вы ошиблись. 6x7=42.

ОТЧЁТ:

Отчет состоит из:

  1. Программ, выполненных на языке программирования Turbo Pascal. Программы должны работать и выводить результат на экран.
  2. Пояснений к программам (если они необходимы), например алгоритмической структуры программы, математических или физических формул используемых при решении т.д.
  3. Ответов на контрольные вопросы к лабораторной работе.

КОНТРОЛЬНЫЕ ВОПРОСЫ:

  1. Как организовать ветвление в программе?
  2. Опишите синтаксис условного оператора и оператора выбора.
  3. Чем отличается сокращенная форма условного оператора от полной?

Карта №4

ТЕМА:      Программы с циклическими конструкциями в Turbo Pascal.

Карта № 5

ТЕМА:      Построение двумерных динамических изображений средствами TP.

весь остальной материал находится в архиве.

-75%
Курсы повышения квалификации

Интерактивные методы в практике школьного образования

Продолжительность 72 часа
Документ: Удостоверение о повышении квалификации
4000 руб.
1000 руб.
Подробнее
Скачать разработку
Сохранить у себя:
Лабораторно-практических занятий «Turbo Pascal 7.0» (69.37 КB)

Комментарии 1

Чтобы добавить комментарий зарегистрируйтесь или на сайт

namik, 31.10.2014 20:10
5+