Будь умным!


У вас вопросы?
У нас ответы:) SamZan.net

Тема- Turbo Pscl Простейшие программы

Работа добавлена на сайт samzan.net:

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 25.11.2024

 

 Разр.

 Адаховский

 

 

190623. ПР. 01. ПЗ

Лист

 

 

Пров.

Кузнецов

 

 

Изм.

Лист

N докум.

Подпись

Дата

Практическая работа № 7

Тема: Turbo Pascal. Простейшие программы.

Цель занятия: научиться решать простейшие задачи в среде Turbo Pascal при помощи математических функций, строить для задач блок-схемы.

Задание. Освоить приемы программирования простейших программ в системе программирования Turbo Pascal.

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

  1.  Наберите в окне редактора текст следующей программы:

Program FirstProgram;

Var a: string;

begin

writeln(‘What is your name?’);

readln(a);

writeln(‘Hello, ’, a, ‘!’);

readln;

end.

  1.  Сохраните имеющийся проект на своем диске, используя меню File/ Save as.
  2.  Запуск приложения:

Перед запуском проекта сначала осуществляется его компиляция. В результате компиляции на диске создается файл с расширением exe.

Если в тексте программы компилятором будут обнаружены ошибки, то курсор установится в место предполагаемой ошибки и в нижней части окна редактирования появится сообщение об обнаруженной ошибке.

Если при компиляции в Вашей программе будут обнаружены ошибки, их необходимо исправить.

Коды типичных ошибок. TP 7.0 генерирует два типа сообщений об ошибках: ошибки компиляции и ошибки выполнения.

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

  1.  Unknown identifier (Неизвестный идентификатор). Этот идентификатор не был описан
  2.  Duplicate identifier (повторение идентификатора).
  3.  Syntax error (синтаксическая ошибка).

14 Invalid file name (Недопустимое имя файла). Имя файла неправильное или указан несуществующий путь.

26 Type mismatch (Несоответствие типов).

42 Error in expression (Ошибка в выражении).

62 Division by zero (Деление на нуль).

64 Cannot Read or Write variables of this type (Нет возможности считать или записать переменные данного типа).

85  «;» expected (Ожидается символ «;»).

91  «:=»expected (Ожидается символ «:=»).

  1.  «.» expected (Ожидается символ «.»).
  2.  «..» expected (Ожидается символ «..»).

После запуска программы на экране появиться надпись «What is your name?». Далее компьютер ожидает ввода строки символов. Введите свое имя и нажмите ENTER. На экране напечатается «Hello,» и введенное вами имя. Далее компьютер ожидает нажатия клавиши ENTER.

Запустите на выполнение программу FirstProgram, используя следующие способы:

  1.  выберите в меню Run/Run;
  2.  клавиша ctrl+F9.
  3.  Измените текст программы так, что бы вначале на экране печаталось сообщение: «My name is Pentium!», а уже потом задавался вопрос «What is your name?». Сохраните изменения проекта. Проверьте его работу.
  4.  Составить программу для одной из ниже приведенных задач (номер задания получить у преподавателя):
  5. Записать по правилам изучаемого языка программирования вычисление следующего выражения:

sina*cosb + cosa*sinb.

  1. Найти сумму цифр двухзначного числа.
  2. Даны два целых числа. Найти их среднее арифметическое.
  3. На борту самолета, летящего по маршруту Москва-Лондон, находятся x пассажиров. Три четверти пассажиров имеют билеты второго класса, все остальные – первого. Билет первого класса стоит b рублей. Это в два раза больше стоимости билета второго класса. Сколько денег получила авиакомпания от продажи билетов на этот рейс?
  4. Дан прямоугольник с размерами 543 x 130 мм. Сколько квадратов со стороной 130 мм можно отрезать от него?
  5. С начала суток прошло n секунд. Определить, сколько полных часов прошло с начала суток.
  6. С начала суток прошло n секунд. Определить, сколько полных минут прошло с начала очередного часа.
  7. С начала суток прошло n секунд. Определить, сколько полных секунд прошло с начала очередной минуты.
  8. Дана величина А, выражающая объем информации в байтах. Перевести число А в мегабайты, килобайты и биты.

Подсказка:

1байт=8 бит

1Кбайт = 1024 байт

1Мб = 1024 Кбайт

  1.  Завершите работу File/Exit или сочетанием клавиш Alt+X.

Содержание отчета

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

Задание 4:

Рисунок 1: копия «My name is Pentium!»

Рисунок 2:копия «What is your name?».


Задание 5(1)

Рисунок 3:копия sina*cosb + cosa*sinb.

Рисунок 4:копия sina*cosb + cosa*sinb.

Вывод: :  научился решать простейшие задачи в среде Turbo Pascal при помощи математических функций, строить для задач блок-схемы.




1. реферат дисертації на здобуття наукового ступеня кандидата медичних наук Київ20
2. тема об~єктивних закономірностей
3. О Стиль руководства в условиях рынка на малых предприятиях Переход российского
4. Теоретические и правовые аспекты применение факторинга в коммерческой организации
5. на тему Берлин столица ФРГ история развития столицы Германии достопримечательности Берлина Выполн
6. Землезнавство і краєзнавство
7. ТЕМАХ POLYE 01
8. nineteen eighty seven 2000 two thousnd 2005 two thousnd five In 1945 in nineteen forty five In 2005 in two thousnd five Запомните t midnight в п
9. статья ЮВ на русскую письменность 14 ~ 15 вв
10. покупка по марже продажа без покрытия
11. Тема - Расчёт и проектирование одноступенчатого вертикального цилиндрического косозубого редуктора для
12. 12.2007 N 318ФЗ от 30.06
13. Чрезвычайный фактор и его понятие
14. тематике. Однако некоторые авторы учебников всё же предлагают следующие определения- Информатика наука о
15. Тестовый контроль квалификационных требований по анатомии и физиологии
16. Списание фактической себестоимости ГП 8110 1320 7010 1210 Дт7010 Кт1320 при оприходов
17. Анализ хозяйственной деятельности предприятия на примере Группы Компаний ПИК
18. экономическим преобразованиям т
19. РЕФЕРАТ дисертації на здобуття наукового ступеня кандидата політичних наук Київ 2005
20. Коллектив как объект и субъект воспитания