Инфоурок › Информатика ›Другие методич. материалы›Рабочая тетрадь "Язык программирования Турбо Паскаль"

Рабочая тетрадь "Язык программирования Турбо Паскаль"

Скачать материал

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

ФГОУ СПО «ПЕНЗЕНСКИЙ АГРАРНЫЙ - ТЕХНИКУМ»

Р А Б О Ч А Я Т Е Т Р А Д Ь

ПО ИНФОРМАТИКЕ

Язык программирования Турбо Паскаль,
система программирования Турбо Паскаль

г. Пенза, 2008 г.

ТЕМА ««Язык программирования Турбо Паскаль,
система программирования Турбо Паскаль».

ПРАКТИЧЕСКАЯ РАБОТА №1.

Наименование работы: «Разработка и программирование задач с линейной структурой».

ЗАДАНИЕ 1.

Цель задания: получить навыки программирования задач с линейной структурой, а также навыки работы в среде программирования Турбо Паскаль.

Задача 1: заданы длины 3-х сторон треугольника, вычислить его площадь и периметр.

Решение: пусть а, b, с – длины сторон треугольника. Необходимо найти S – площадь, Р – периметр треугольника. Воспользуемся формулой Герона:

, где r – полупериметр.

Исходными данными являются величины а, b, с, результатом – S и P.

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

Program Ex1;

Var a,b,c,r,P,S:real;

Begin

Writeln (‘a= ’);

Read (a);

Writeln (‘b= ’);

Read (b);

Writeln (‘c= ’);

Read (c);

r:=(a+b+c)/2;

P:=a+b+c;

S:=SQRT(r*(r-a)*(r-b)*(r-c));

Writeln (‘Периметр =’,P);

Writeln (’Площадь =’,S);

end.

Задача 2: заданы длины 2-х катетов в прямоугольном треугольнике. Найти длину гипотенузы и площадь треугольника.

Решение: пусть a, b– катеты треугольника, а с – гипотенуза. Необходимо найти S – площадь и С - длину гипотенузы. Воспользуемся следующими формулами:

Исходными данными являются величины а, в, результатом – S и С.

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

Program Ex2;

Var a,b,c,S:real;

Begin

Writeln (‘a=’);

Read (a);

Writeln (’b=’);

Read (b);

С:=SQRT(a*а+b*b);

S:=(a+b)/2;

Writeln (‘Гипотенуза =’,С);

Writeln (’Площадь =’,S);

end.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЙ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст первой программы.

3. Сохранить текст программы под именем zadacha1 (zadacha2), для чего выбрать команду File – Save as и в открывшемся окне ввести имя файла (не более 8 символов), расширение .pas добавиться автоматически. Нажать кнопку ОК.

4. Выполнить компилирование программы с помощью команды Compile – Compile (или нажать одновременно клавиши Alt и F9). Если программа не содержит ошибок, то появится сообщение об успешной компиляции. Если в программе есть ошибки, то появится сообщение об ошибке, код ошибки, а текстовый курсор покажет место ошибки.

5. Запустить программу на выполнение, для чего выбрать команду Run – Run (или нажать одновременно клавиши Ctrl и F9). Откроется пользовательский экран (User Screen), в котором нужно ввести исходные данные (для Задачи 1: а = 125.7; b = 63.8; с = 123.5; для Задачи 2: a = 74.5; b =56.9). Для возврата к окну с текстом программы используется клавиша Esc.

6. Выполнить команду Debug – Output и в нижней части экрана появится пользовательский экран с исходными данными и результатом.

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

ЗАДАНИЕ 2 (для самостоятельного выполнения)

Цель задания: закрепить навыки программирования задач с линейной структурой, а также навыки работы в среде программирования Турбо Паскаль.

Составить алгоритм и программу на языке программирования Турбо Паскаль для решения следующих задач:

1. Рассчитать объем и площадь полной поверхности конуса по формулам:
V = 1/3PR²H; S = PRL + PR².

2. Рассчитать объем и площадь полной поверхности цилиндра по формулам:
V = PR²H; S = 2PRH + 2PR².

3. Вычислить сумму и произведение трех чисел A, B, C (целого типа).

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

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

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

2. Назовите основные символы алфавита языка программирования Турбо Паскаль?

3. Каковы приоритеты выполнения операций?

4. Какие правила следует соблюдать при записи математических выражений на языке программирования Турбо Паскаль?

5. Для чего необходимо компилировать программу?

6. Как запустить программу на выполнение?

7. Как увидеть результаты выполнения программы на экране?

8. Можно ли копировать фрагменты программы?

9. Какое расширение имеют файлы, созданные в среде программирования Турбо Паскаль?

10. Как открыть файл в среде программирования Турбо Паскаль?

11. Как создать файл в среде программирования Турбо Паскаль?

ПРАКТИЧЕСКАЯ РАБОТА №2.

Наименование работы: «Разработка и программирование задач с разветвляющейся структурой».

ЗАДАНИЕ 1.

Цель задания: получить навыки программирования задач с разветвляющейся структурой, а также навыки работы в среде программирования Турбо Паскаль.

Задача 1: решить квадратное уравнение ax² + bx + c, если известны коэффициенты а, b, с.

Решение: чтобы решить квадратное уравнение (т.е. определить значение х), необходимо воспользоваться следующими формулами:

Исходными данными являются величины а, b, c, результатом – x1 и x2.

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

Program Ex6;

Var a,b,c,d,x1,x2:real;

Begin

Writeln (‘введите коэффициенты
уравнения’);

Read (a);

Read (b);

Read (c);

D:=b*b-4*a*c;

if D<0 then writeln (‘корней нет’)

else

begin

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

x2:=(-b-sqrt(D))/2*a;

writeln (‘X1 = ’,x1,’X2 = ‘,x2);

end;

end.

Задача 2: заданы числа a и b. Найти значение х по формулам:

Исходными данными являются величины а, в, результатом – х.

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

Program Ex7;

Var a,b,x:real;

Begin

Writeln (‘a= ‘);

Read (a);

Writeln (‘b= ‘);

Read (b);

if a>b then x:=a/b else x:=b/a;

writeln (‘X = ’,x:2:2);

end.

x=b/a

x=a/b

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЙ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст первой программы.

3. Сохранить текст программы под именем zadacha6 (zadacha7), для чего выбрать команду File – Save as и в открывшемся окне ввести имя файла (не более 8 символов), расширение .pas добавиться автоматически. Нажать кнопку ОК.

5. Запустить программу на выполнение, для чего выбрать команду Run – Run (или нажать одновременно клавиши Ctrl и F9). Откроется пользовательский экран (User Screen), в котором нужно ввести исходные данные (для Задачи 6: а = 125; b = 68; с = 15; для Задачи 7: a = 75; b =69). Для возврата к окну с текстом программы используется клавиша Esc.

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

ЗАДАНИЕ 2 (для самостоятельного выполнения)

Цель задания: закрепить навыки программирования задач с разветвляющейся структурой, а также навыки работы в среде программирования Турбо Паскаль.

Составить алгоритм и программу на языке программирования Турбо Паскаль для решения следующих задач:

1. Найти максимальное из двух чисел a и b.

2. Найти минимальное из трех чисел a, b, c.

Показать результаты выполнения программ преподавателю.

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

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

2. Какой оператор служит для организации вычислительного процесса в зависимости от какого-либо логического условия?

3. Назовите полную форму условного оператора?

4. Назовите сокращенную форму условного оператора?

5. Чем отличается оператор Writeln от оператора Write?

6. Как выполняется оператор Read?

7. Как удалить строку из текста программы?

8. Как войти в главное меню программы?

9. Из каких разделов состоит программа на Турбо Паскале?

10. Как выйти из среды программирования Турбо Паскаль?

ПРАКТИЧЕСКИЕ РАБОТЫ №3,4 .

Наименование работы: «Разработка и программирование задач с циклической структурой».

ЗАДАНИЕ 1.

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

Задача 1: найти сумму квадратов всех натуральных чисел от 1 до 100, используя 3 вида циклов (Repeat - «До», While – «Пока», For – цикл с параметрами)

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

Цикл «До» (оператор Repeat)

Надпись: Program DO;
Var A:integer;
S:longint;
Begin
A:=1;
S:=0;
Repeat
S:=S+A*A;
A:=A+1;
Until A>100;
Writeln (‘S =’, S);
end.

S = 0

Цикл «Пока» (оператор While)

Надпись: Program POKA;
Var A:integer;
S:longint;
Begin
A:=1; S:=0;
While A≤100 do
begin
S:=S+A*A;
A:=A+1;
end;
Writeln (‘S =’, S);
end.

Цикл с заранее известным числом повторений (цикл с параметром)

(оператор For)

Program PARAMETR;

Var A:integer;

S:longint;

Begin

Шестиугольник: A=1, 100 S:=0;

for A:=1 to 100 do S:=S+A*A;

Writeln (‘S =’, S);

end.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЙ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст первой программы.

3. Сохранить текст программы, для чего выбрать команду File – Save as и в открывшемся окне ввести имя файла (не более 8 символов), расширение .pas добавиться автоматически. Нажать кнопку ОК.

5. Запустить программу на выполнение, для чего выбрать команду Run – Run (или нажать одновременно клавиши Ctrl и F9).

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

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

ЗАДАНИЕ 2 (для самостоятельного выполнения)

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

Составить алгоритм и программу на языке программирования Турбо Паскаль для решения следующих задач:

1. Вычислить при n = 8.

2. Вычислить при m = 3, n = 17.

3. Вычислить F = 1*2* … *m = m! если m = 6.

4. Вычислить , при n = 10.

Указание: для решения задач можно использовать любой оператор цикла.

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

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

1. Какой алгоритм называется циклическим?

2. Что такое «тело» цикла?

3. Какие операторы цикла вы знаете?

4. Чем отличается цикл «До» от цикла «Пока»?

5. Опишите структуру оператора For?

6. Что называется переменной- счетчиком?

ПРАКТИЧЕСКИЕ РАБОТЫ №5, 6

Наименование работы: «Разработка и программирование задач с массивами».

ЗАДАНИЕ 1.

Цель задания: получить навыки программирования задач с массивами, а также навыки работы в среде программирования Турбо Паскаль.

Задача 1: дан массив Х, состоящий из n элементов. Найти сумму элементов этого массива.

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст программы.

5. Запустить программу на выполнение, для чего выбрать команду Run – Run (или нажать одновременно клавиши Ctrl и F9). Откроется пользовательский экран (User Screen), в котором нужно ввести исходные данные:

Х[1]=5; X[2]=7; X[3]=3; X[4]=-2; X[5]=4; X[6]=1; X[7]=9.

Для возврата к окну с текстом программы используется клавиша Esc.

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

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

Задача 2: дан массив Х, состоящий из n элементов. Найти произведение элементов этого массива.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

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

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

2. Ввести текст программы, сохранить программу.

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

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

ЗАДАНИЕ 2.

Цель задания: закрепить навыки программирования задач с массивами, а также навыки работы в среде программирования Турбо Паскаль.

Задача 3: дан массив Х, состоящий из n элементов. Найти максимальный элемент массива и номер, под которым он хранится в массиве.

Алгоритм решения задачи следующий: предположим, что первый элемент массива является максимальным и запишем его в переменной MAX, а в NMAX – его номер (т.е. 1). Затем в цикле сравниваем все элементы, начиная со 2-го с максимальным. Если текущий элемент массива оказывается больше максимального, то записываем его в переменную MAX, а в переменную NMAX – текущее значение индекса i (номера).

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

Program MAXIMUM;

Const

N:=10;

Var

X:array [1..N] of real; i:integer;

MAX,NMAX:real;

Begin

For i:=1 to N do

begin

writeln (‘X[’,i,’]=’);

readln(X[i]);

end;

MAX:=X[1]; NMAX:=1;

For i:=2 to N do

If X[i]>MAX then

Begin

MAX:=X[i]; NMAX:=I;

end;

writeln (‘MAX = ‘, MAX:1:3,
‘NMAX =’, NMAX);

end.

. . .

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст программы.

Х[1]=-5; X[2]=7; X[3]=12; X[4]=0; X[5]=3;

X[6]=127; X[7]=31; Х[8]=8; X[9]=-4; X[10]=9;

Для возврата к окну с текстом программы используется клавиша Esc.

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

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

Задача 4: дан массив Х, состоящий из n элементов. Найти минимальный элемент массива и номер, под которым он хранится в массиве.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

Указание: измените блок-схему и программу нахождения максимального элемента массива и его номера таким образом, чтобы найти минимальный элемент массива и номер, под которым он хранится в массиве.

2. Ввести текст программы, сохранить программу.

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

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

Задача 5: дан массив Х, состоящий из n целых чисел. Расположить элементы массива в порядке возрастания их значения.

Алгоритм решения задачи следующий: сравним первый элемент массива со вторым, если первый окажется больше второго, то поменяем их местами. Те же действия выполним для второго и третьего, третьего и четвертого, i-го и (i+1)-го, (n-1)-го и n-го элементов. В результате этих действий самый большой элемент станет на последнее (n-е) место. Теперь повторим данный алгоритм сначала, но последний (n-й) элемент, рассматривать не будем, т.к. он уже занял свое место. После проведения данной операции самый большой элемент оставшегося массива станет на (n-1)-е место. Так повторяем до тех пор, пока не упорядочим весь массив.

Составим блок-схему алгоритма и программу решения данной задачи на языке программирования Турбо Паскаль:

. . .

Program PORADOK;

Const

N:=5;

Var

X:array [1..N] of word;
i,j:integer; b:word;

Begin

For i:=1 to N do

begin

writeln (‘X[’,i,’]=’);

readln(X[i]);

end;

writeln (‘Массив Х’);

For i:=1 to N do write (X[i], ‘ ‘);

Writeln;

For j:=1 to N-1 do

For i:=1 to N-j do

If X[i]>X[i+1] then

begin

b:=X[i];

X[i]:=X[i+1];

X[i+1]:=b;

end;

writeln (‘Упорядоченный массив’);

For i:=1 to N do

write (X[i], ‘ ‘);

writeln;

end.

. . .

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст программы.

Х[1]=7; X[2]=3; X[3]=5; X[4]=4; X[5]=2.

Для возврата к окну с текстом программы используется клавиша Esc.

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

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

Задача 6: дан массив Х, состоящий из n целых чисел. Расположить элементы массива в порядке убывания их значения.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

2. Ввести текст программы, сохранить программу.

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

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

Задача 7: дан массив Х, состоящий из n элементов. Найти сумму всех положительных элементов массива.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

2. Ввести текст программы, сохранить программу.

3. Выполнить программу, введя следующие исходные данные:

Х[1]=-5; X[2]=17; X[3]=-3; X[4]=-22; X[5]=14; X[6]=-1; X[7]=9.

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

Задача 8: дан массив Х, состоящий из n элементов. Найти произведение всех отрицательных элементов массива.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

2. Ввести текст программы, сохранить программу.

3. Выполнить программу, введя следующие исходные данные:

Х[1]=-5; X[2]=17; X[3]=-3; X[4]=-22; X[5]=14; X[6]=-1; X[7]=9.

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

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

1. Какие данные называются массивом?

2. Какой оператор служит для описания массивов?

3. Как организовать ввод-вывод элементов массива?

4. Опишите алгоритм нахождения суммы элементов массива?

5. Опишите алгоритм нахождения произведения элементов массива?

6. Опишите алгоритм поиска максимального элемента массива и его номера?

7. Опишите алгоритм поиска минимального элемента массива и его номера?

8. Опишите алгоритм упорядочивания элементов в массиве по возрастанию?

9. Опишите алгоритм упорядочивания элементов в массиве по убыванию?

ПРАКТИЧЕСКАЯ РАБОТА №7

Наименование работы: «Разработка процедур (подпрограмм) и функций.

ЗАДАНИЕ 1.

Цель задания: получить навыки разработки подпрограмм и функций.

Задача 1: составить процедуру (подпрограмму) вычисления степени числа a:

aⁿ, где а, n – целые числа.

Составим программу вычисления степени числа а на языке программирования Турбо Паскаль:

Program STEPEN;

Var p,a,n,i:integer;

Begin

p:=1; n:=7;

writeln (‘a=’);

read (a)

for i:=1 to n do p:=p*a;

write (‘степень числа а = ’,р);

end.

Пояснения

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

Подпрограмма – именованная, логически законченная группа операторов языка, которую можно вызвать для выполнения любое количество раз из различных мест программы. В языке Турбо Паскаль существует 2 вида подпрограмм: процедуры и функции.

Главное отличие процедур от функций заключается в том, что результатом последних является одно единственное значение.

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

Procedure <имя> (<список формальных параметров>);

Например:

Procedure a17 (a:real; b,c:real; var x1,x2:real: var k:integer);

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

Для обращения к процедуре необходимо использовать оператор вызова процедуры. Он имеет вид:

<имя процедуры> (<список_фактических_параметров>);

Например:

STEPEN (b, m, j, h);

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

Количество, типы и порядок следования формальных и фактических параметров должны совпадать.

Пример использования процедуры в программе приведен ниже:

Program PROCED1;

Var b, m, j, h:integer;

Procedure s (a,n,i:integer; var p:integer);

Begin

p:=1; n:=7;

for i:=1 to n do p:=p*a;

end;

begin

writeln (‘b=’);

read (b)

s (b, m, j, h)

write (‘степень числа b = ’, h);

end.

Функции. В Турбо Паскале есть стандартные функции (sin, ln, exp . . .), кроме них программист может воспользоваться собственными функциями, предварительно описав их в программе.

Формат описания функции:

function<имя функции> (<имя формального параметра 1>:<Тип>;
<имя формального параметра 2>:<Тип>):тип результата;

Обращение к функции осуществляется по имени с указанием списка фактических параметров. Количество, типы и порядок следования формальных и фактических параметров должны совпадать:

<имя функции> (<список_фактических_параметров>);

Пример описания функций: function tan (x:real):real;

function max (x,y:real):real;

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст программы PROCED1.

1). B = 2; 2). B = 5; 3). B = 12.

Для возврата к окну с текстом программы используется клавиша Esc.

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

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

Задача 2: составить процедуру (подпрограмму) вычисления суммы двух чисел a и b:

c = a + b, где а, b, c – вещественные числа.

Составим на языке программирования Турбо Паскаль программу вычисления суммы двух чисел с использованием процедуры:

Program PROCED2;

Var x,y,z:real;

Procedure SUM(a,b:real;var c:real);

Begin

c:=a=b;

end;

begin

writeln (‘x=’);

read (x)

writeln (‘y=’);

read (y);

SUM(x,y,z);

writeln (‘z = ’,z);

end.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ НА КОМПЬЮТЕРЕ.

1. Запустить среду программирования Турбо Паскаль, щелкнув 2 раза ЛКМ на ярлыке.

2. В окне редактора введите текст программы.

х = 457; y = 525.

Для возврата к окну с текстом программы используется клавиша Esc.

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

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

Задача 3: разработать на языке программирования Турбо Паскаль функцию вычисления суммы двух чисел a и b:

c = a + b, где а, b, c – вещественные числа.

Составим программу вычисления функции суммирования двух чисел на языке программирования Турбо Паскаль:

Program FUNC1;

Var x,y:real;

Function SUM(a,b:real):real;

Begin

SUM:=a+b;

end;

begin

writeln (‘x=’);

read (x)

writeln (‘y=’);

read (y);

writeln (SUM(x,y));

end.

ЗАДАНИЕ 2 (для самостоятельного выполнения)

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

Задача 4: составить процедуру (подпрограмму) вычисления произведения трех чисел a, b, с:

z = a * b * c, где а, b, c – вещественные числа.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

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

2. Ввести текст программы, сохранить программу.

3. Выполнить программу, введя следующие исходные данные:

a (k) = 25.7; b (m) = 12.5; c (n)= 33.

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

Задача 5: разработать на языке программирования Турбо Паскаль функцию вычисления произведения трех чисел a, b, с:

z = a * b * c, где а, b, c – вещественные числа.

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

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

2. Ввести текст программы, сохранить программу.

3. Выполнить программу, введя следующие исходные данные:

a (k) = 25.7; b (m) = 12.5; c (n)= 33.

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

Задача 6: разработать на языке программирования Турбо Паскаль функцию вычисления ctg(x).

ПОРЯДОК ВЫПОЛНЕНИЯ ЗАДАНИЯ

1. Самостоятельно составить на языке программирования Турбо Паскаль программу вычисления ctg(x) с использованием функции.

2. Ввести текст программы, сохранить программу.

3. Выполнить программу, введя следующие исходные данные:

c (х) = 30.

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

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

1. Что называется подпрограммой?

2. Какие виды подпрограмм используются в языке программирования Турбо Паскаль?

3. Чем отличается процедура от функции?

4. Как описывается процедура?

5. Как описывается функция?

6. Опишите оператор вызова процедуры?

7. Опишите оператор вызова функции?

РЕКОМЕНДУЕМАЯ ЛИТЕРАТУРА

1. Алексеев Е.Р., Чеснокова О.В., Павлыш В.Н., Славинская Л.В. Турбо Паскаль 7.0. – М.: НТ Пресс, 2006.

2. Лысенко К.Н. Информатика. (курс лекций) – Пенза: Изд-во Пензенского технологического института, 2003.

3. Шипунова А.В. Информатика: учеб.-справ. пособие. – М.: АСТ: Астрель: Транзиткнига, 2006.

Скачать материал

Скачать материал "Рабочая тетрадь "Язык программирования Турбо Паскаль""

Как учитель может зарабатывать на Инфоуроке?

Краткое описание документа:

Основной формой практического освоения учебного материала в компьютерном классе является практическая работа. Использование рабочей тетради на уроках информатики позволяет более эффективно распорядиться урочным временем, обеспечить более высокую результативность. Рабочая тетрадь может быть использована студентами и преподавателями, как на уроках, так и для домашней подготовки к занятиям. Материал в рабочей тетради изложен следующим образом: задание; порядок выполнения задания; задания для самостоятельного выполнения; контрольные вопросы.

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

В основу рабочей тетради положены многолетний опыт ведения профессиональной и преподавательской деятельности на ЭВМ, конспекты лекций, инструкционные карты, рабочие тетради автора по предметам «Информатика и ВТ», «Информатика», «Информационные технологии в профессиональной деятельности».

Скачать материал

Найдите материал к любому уроку, указав свой предмет (категорию), класс, учебник и тему:

6 672 491 материал в базе

Найти материалы

Скачать материал

Другие материалы

docx

Экзаменационные билеты по дисциплине:

06.06.2015
3440
8

docx

Календарно-тематическое планирование по информатике, 5 класс, 70 часов в год, ФГОС

06.06.2015
725
0

docx

КОС для результатов освоения ПМ.01 Участие в проектировании сетевой инфраструктуры СПО Компьютерные сети

Рейтинг: 3 из 5

05.06.2015
4032
56

docx

Разработка технологической карты урока информатики в соответствии с требованиями ФГОС

05.06.2015
843
0

docx

Табличная форма представления информации

05.06.2015
1729
0

pptx

Презентация по информатике на тему: "Путешествие в страну «Компьютерная графика»" (5 класс)

05.06.2015
1127
0

docx

Подготовка к ЕГЭ по информатике (задание 4) по теме "Системы счисления"

05.06.2015
6089
2

Оставьте свой комментарий

Авторизуйтесь, чтобы задавать вопросы.

Скачать материал
- 06.06.2015 1018
- DOCX 262 кбайт
- Оцените материал:
Настоящий материал опубликован пользователем Волкова Наталья Николаевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт

Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материал
Автор материала

Волкова Наталья Николаевна
- На сайте: 8 лет и 10 месяцев
- Подписчики: 0
- Всего просмотров: 5548
- Всего материалов: 8