Программирование на Pascal / Delphi / Лабораторные работы1 / Лаба№2

Уфимский государственный авиационный технический университет

Кафедра Информатики

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

Turbo Pascal 7.0

Студент ИНЕК

Группа К-122

Кизка Н.Д.

Проверила:

Филосова Е.И.

Уфа

2006г.

Вариант 3

Задача №1

Вычислить значения выражения:

y =ax+ b/2+a

Вычисление:

Program zion;

var y,a,x,b:real;

begin

writeln('vvedite znacheniya');

readln(a,x,b);

if (2+a)=0 then

writeln('nekorektie dannie')

else

begin

y:=(a*x+b/(2+a));

writeln('otvet=',y:6:2);

readln

end;

end.

Задача №2

Вычислить значение выражения:

y= |ax|+ b/(2+sqrt(a));

Вычисление:

Program legion;

var y,a,x,b,a1:real;

begin

writeln('vvedite znacheniya');

readln(a,x,b);

if (2+sqrt(a)=0)or(a<0) then

writeln('nekoreknye dannye')

else

begin

if (a*x)<0 then a1:=(a*x)*(-1);

y:=a1+(b/2+sqrt(a));

writeln('otvet=',y:6:2);

if y>0 then writeln('pologiteliniy');

if y<0 then writeln('otricateliniy');

if y=0 then writeln('ravno nulu');

readln

end;

end.

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

1. Чтобы воспользоваться меню среды Borland Pascal 7.0 необходимо нажать F10, либо использовать мышь. При помощи мыши или клавиши курсора пользователь может выбрать нужный пункт меню. Некоторые команды доступны через “горячие клавиши”.

2. В окне редактора среды Borland Pascal 7.0 отображены следующие элементы:

- имя файла программы на диске;

- элементы управления окном мышью;

- полосы прокрутки;

- координаты положения курсора в тексте программы;

3. Основные функции меню среды Borland Pascal 7.0:

1. - File – набор команд для работы с файлами (открытие, сохранение программы);

2. - Edit – набор команд для работы с текстом;

3. - Search – команды поиска по тексту программы;

4. - Run – команды, управляющие выполнением программы;

5. - Compile – команды компиляции программы, т.е. получение исполняемого файла;

6. - Debug – команды отладки;

7. - Tools – дополнительные утилиты;

8. - Options – настройки среды;

9. - Window – команды навигации между открытыми программами;

10. - Help – помощь.

4. Чтобы сохранить программу на диске необходимо нажать клавишу F2 или выбрать пункт меню File->Save. В появившемся окне необходимо выбрать каталог и ввести имя файла программы и нажать OK.

5. Компиляция программы - это получение исполняемого (exe) файла.

6. Чтобы запустить программу на выполнение необходимо нажать сочетание клавиш (Ctrl + F9).

7. Логическая ошибка программы – это успешная компиляция программы, но неправильное ее выполнение.

8. Чтобы найти логическую ошибку программы необходимо использовать отладку. Используя сочетание клавиш (Ctrl + F8) на строке с курсором устанавливается точка остановки (Breakpoint). При запуске программы достижения команды такой строки будет произведена остановка программы и переход в режим отладки программы. При нажатии клавиши F7/F8, будет выполнена только команда строки, на которой стоит курсор исполнения программы.

9. Переменные в языке Pascal объявляются командой var.

10. Основные типы данных в языке Pascal:

- boolean – булевская переменная, может принимать значение true (истина) или false (ложь);

- integer – целочисленная переменная (значение от -32768 до 32767);

- real – переменная с плавающей точкой (значение по модулю от 2.9*10^-39 до 1.7*10³⁸);

- double – переменная с плавающей точкой (значение по модулю от 5.0*10^-324 до 1.7*10³⁰⁸);

- char – переменная одного символа;

- string – строковая переменная.

11. Команды группируются ключевыми словами begin end:

12. Комментарии в программе записываются внутри фигурных скобок или внутри символов (* комментарии *).

13. Чтобы ввести данные с клавиатуры необходимо задать команду read или readln.

14. Чтобы вывести данные на экран необходимо задать команду write или writeln.

15. Присваивание – это запись вида (x:=)

16. Чтобы воспользоваться командой условия необходимо ввести команду следующего вида: if <условие> then <операция1>[else <операция2>]

17. Команда ветвления – это команда case, которая предполагает несколько ответов решения программы.

18. Длинна строки – это ее размер в символах. Чтобы ее получить необходимо, ввести команду Length. Чтобы изменить, надо ввести команду SetLength.

19. Чтобы воспользоваться тригонометрическими функциями, необходимо ввести команды sin, cos, tg.

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