Практическая работа №1. Программирование линейных
вычислительных процессов.
Цель работы: знакомство с текстовым редактором системы программирования
Турбо – Паскаль.
Разработка линейных алгоритмов, компиляция и
выполнение программы.
Задание: Разработать программу для
нахождения значения Y при заданном значении Х.
I.
Y= ,
при х=47.
II.
Y=10x −5 x − 2 + (1+ x)2
, при х=2,3.
III.
, при х=25.
IV.
Y=
, при х=1,2. ln x
x5
V.
Y=2cos(3 )x − 2
, при х=1,5.
12x + 7x−5
cos x x
VI.
Y= +16xcos x −12
, при х=0,45.
2x
3x −
4x +
(1−
x )
VII.
Y=
, при х=0,23. cos xsin x
2x −
cos x+
sin(2x)
VIII.
Y=
, при х=4.
16xsin x
IX.
Y=cos x + −
2
, при х=0,85.
7
X.
Y= x+ −
x +8
, при х=5. x
3
Таблица правильных ответов:
А
|
В
|
С
|
2,290
|
21,405
|
0,254
|
207,235
|
3,626
|
0,120
|
3,092
|
4,000
|
30,827
|
3,655
|
601,977
|
32,500
|
Практическая
работа №2. Программирование
условных вычислительных процессов. Цель работы: знакомство с условным оператором IF
и оператором выбора CASE, как с операторами, программирующими выбор некоторых
параметров задачи по поставленному условию. Отработка навыков по работе в
системе программирования
Турбо – Паскаль, компиляция и
выполнение написанной программы.
I.
Составить
программу, которая определит, является ли треугольник со сторонами А,В,С
равнобедренным.
Для целого числа K от 1 до 99 напечатать фразу «Мне К лет». При этом
стоит учитывать, что при некоторых значениях К слово «лет» надо заменить на
слово «год» или «года».
II.
Даны два
угла треугольника (в градусах). Программным путём определить, существует ли
такой треугольник.
Написать программу, которая бы по введённому номеру
единицы измерения (1 – дециметр, 2 – километр, 3 – метр, 4 - сантиметр ) и
длине отрезка L выдавала бы соответствующее значение длины в метрах.
III.
Составить
программу, которая определит, является ли треугольник со сторонами А,В,С
равносторонним.
Составить программу, которая по данному числу (1-12) выводит
название соответствующего ему месяца.
IV.
На оси ОХ
расположены три точки А, В, С. Программным путём определить, какая из точек В
или С расположена ближе к точке А.
Составить программу, позволяющую получить описание школьных
отметок (1 – плохо, 2 – неудовлетворительно, 3 – удовлетворительно, 4 – хорошо,
5 - отлично).
V.
Дан круг
радиуса R. Программным путём определить, поместится ли квадрат со стороной А в
этот круг.
Имеется пронумерованный список деталей: 1) шуруп, 2) гайка,
3) болт, 4) винт, 5) гвоздь. Составить программу, которая по номеру детали
выводит на экран её название.
VI.
Вычислить
значение функции:
x2 +4x+5 , при х ≤ 2
1
Y= 2 в противном случае.
x + 4x +
5
Написать программу, которая бы по введённому номеру единицы измерения
(1 – килограмм, 2 – грамм, 3 – тонна, 4 - центнер) и массе М выдавала бы
соответствующее значение массы в килограммах.
VII.
Даны три
действительных числа. Написать программу для возведения в квадрат тех из них, значения
которых неотрицательны и в четвёртую степень - отрицательные.
Написать программу, которая по введённому номеру времени года,
выдаёт соответствующие этому времени года названия месяцев.
VIII.
Даны
действительные числа А, В, С. Программным путём удвоить, эти числа и посчитать
их сумму, если А ≥ В ≥ С или подсчитать сумму квадратов этих чисел, если
условие не выполняется.
Написать программу, которая по номеру дня недели выдаёт в
качестве результата количество уроков в вашем классе в этот день.
IX.
Вычислить
значение функции:
45x5 + 5 , при х≥0,23
58x8
Y= 5x в противном случае. sin x
Даны два действительных положительных числа. Арифметические
действия над ними пронумерованы (1 – сложение, 2 – вычитание, 3 – умножение, 4
- деление). Составить программу, которая по введённому номеру выполняет то или
иное действие над числами.
X.
Дан круг
радиуса R. Программным путём определить, поместится ли он в квадрат со стороной
А.
Для каждой введённой цифры (0-9) вывести программным путём
соответствующее ей название на английском языке.
Практическая работа №3. Программирование циклических
вычислительных процессов.
Цель работы: знакомство с операторами,
программирующими повторяющиеся участки программы. Формирование навыков по
составлению программ для подсчёта количества,
суммы и произведения в цикле.
Отработка навыков по работе в системе программирования Турбо – Паскаль, компиляция
и выполнение написанной программы.
Подсчёт произведения и суммы в цикле.
1.
Дано
натуральное число N.
Вычислить значение Y по формуле при введённом значении N=4. Сравнить
полученный результат с таблицей правильных ответов.
1 1 1
Y= 1− 2 1− 2 ...1− 2 .
2 3 N
2.
Дано
натуральное число N.
Вычислить значение Y по формуле при введённом значении N=5. Сравнить
полученный результат с таблицей правильных ответов.
Y= 2*4*...*2N .
3.
Дано
натуральное число N.
Вычислить значение Y по формуле при введённом значении N=6. Сравнить
полученный результат с таблицей правильных ответов.
Y=1*3*5*...*(2N−1).
4.
Вычислить
значение Y по формуле. Сравнить полученный ответ с таблицей правильных
ответов.
Y=sin1+ sin1.1+ sin1.2 +...+ sin2.
5.
Дано
натуральное число N.
Вычислить значение Y по формуле при введённом значении N=7. Сравнить
полученный результат с таблицей правильных ответов.
1
1 1 1
Y= + + +...
1 2 3 N
6.
Даны
действительное число А и натуральное число N. Вычислить значение Y по формуле
при введённых значениях N=5, А=2. Сравнить полученный ответ с таблицей
правильных ответов.
Y=a2 + a4 + a6 +...+ a2N
7. Дано натуральное число N.
Вычислить значение Y по формуле при введённом значении N=5. Сравнить
полученный результат с таблицей правильных ответов.
Y= 1+
8. Вычислить значение Y по формуле. Сравнить
полученный ответ с таблицей правильных ответов.
Y= (1+ sin1)(1+ sin2)+...+(1+ sin10) 9. Дано натуральное число N.
Вычислить значение Y по формуле при введённом значении N=5. Сравнить
полученный результат с таблицей правильных ответов.
Y= 2 .
10. Дано натуральное число N.
Таблица правильных ответов.
|
А
|
В
|
С
|
0,63
|
3840
|
10395
|
0,25879
|
1,997591
|
0,32
|
125
|
2,735877
|
0,95
|
1364
|
0,061298
|
2,59
|
Вычислить значение Y по формуле при введённом значении
N=7. Сравнить полученный результат с таблицей правильных ответов.
2
4 6 2N
Y= *...*
2N +1
Подсчёт количества в цикле.
Определить, сколько из N заданных
точек c вводимыми с клавиатуры координатами принадлежат графику функции:
1.
Y=sin x +
2x2
1
2.
Y=
2cos x
2x
3.
Y= 3
3x + 7
sin x + cos x
4.
Y=
2
5.
Y= 4x2 +
5x +10
6.
Y= 17x2 +8x3 −
4
x2 −
7x+
5
7.
Y=
3
x3 +x5
8.
Y=
4
x7
9.
Y=
5 +
2x
x2 + 4x
10. Y=
x3
0
x
Ответы П/Р №3
(часть I). 6.
program
f;
var
n,a,i:integer;
1.
program
f;
y:real;
begin var
i,n:integer;
write('vvedite N=');
y:real; readln(n);
begin
write('vvedite A='); write('vvedite
N=');
readln(a);
readln(n); y:=0;
y:=1;
for i:=1 to n do y:=exp(2*i*ln(a))+y;
for i:=2 to n do y:=(1-1/sqr(i))*y;
writeln('y=',y:9:2);
writeln('y=',y:7:2);
readln; readln;
end. (n=5,a=2,y=1364) end. (n=4,y=0,63)
2.
program
f; 7. program
f; var
n,i:integer; var
i,n:integer;
y:real; y:real;
begin
begin write('vvedite
N='); write('vvedite
N=');
readln(n); readln(n);
y:=0;
y:=1;
for i:=1 to n do y:=sqrt(i+y);
for i:=1 to n do y:=2*i*y;
writeln('y=',y:9:6);
writeln('y=',y:7:2); readln;
readln;
end. (n=5,y=2,735877) end.
(n=5,y=3840)
3.
program
f; 8. program
f; var
n:integer; var
i,n:integer;
y,i:real;
y:real; begin
begin
{write('vvedite
N=');} write('vvedite
N=');
{readln(n);}
readln(n);
y:=1; y:=1;
i:=1;
for i:=1 to n do y:=(2*i-1)*y; while
i<=10 do begin y:=(1+sin(i))*y;
writeln('y=',y:7:2);
i:=i+1; readln;
end;
end. (n=6,y=10395)
writeln('y=',y:9:6);
4.
program
f;
readln;
end. (y=0,061298) var
n:integer;
y,i:real;
9. program
f;
begin
var n,i:integer;
{write('vvedite
N=');}
y:real;
{readln(n);}
begin y:=0;
write('vvedite N=');
i:=1; readln(n);
while i<=2 do begin
y:=sin(i);
y:=0;
i:=i+0.1;
for i:=1 to n do y:=sqrt(2+y);
writeln('y=',y:7:2);
writeln('y=',y:7:2); readln;
readln;
end. (y=0,95) end.
(n=5,y=1,997591)
5.
program
f;
10.
program
f; var
n,i:integer; var
i,n:integer;
y:real;
y:real; begin
begin
write('vvedite N='); write('vvedite
N=');
readln(n);
readln(n); y:=0;
y:=1;
for i:=1 to n do y:=1/i+y; for
i:=1 to n do y:=(2*i)/(2*i+1)*y;
writeln('y=',y:7:2);
writeln('y=',y:4:2);
readln; readln;
end. (n=7,y=2,59) end. (n=7,y=0,32)
Практическая работа № 4. Работа со строковым типом данных.
Цель работы: знакомство со стандартными
процедурами и функциями для обработки строкового типа данных в системе
программирования Турбо – Паскаль. Формирование
навыков по составлению программ,
работающих со структурированным типом данных .
Отработка навыков по работе в системе
программирования Турбо – Паскаль, компиляция и выполнение написанной программы.
Часть I.
Составить программу для формирования
из слова1 слова2, используя операцию сцепления и функцию Copy.
Слово1 Слово2
1. Дисковод Воск
2. Апельсин Пена
3. Компьютер Моток
4. Цветок Кот
5. Форматирование Ватман
6. Стандарт Наст
7. Проводка Корова
8. Лампочка Полка
9. Потолок Толк
10. Сувенир Рис
Составить программу, для формирования из слова1 слова2,
используя функции Delete и Insert.
Слово1 Слово2
1. Математика Система
2. Правило Операция
3. Ковёр Конверт
4. Форматирование Тираж
5. Монитор Нитка
6. Зеркало Ручка
7. Огонь Погоня
8. Шнурок Шарик
9. Лекция Цапля
10. Символ Солод
Часть II.
1.
Составить программу,
формирующую символьную строку, состоящую из 28 символов ‘/’.
2.
Составить программу,
формирующую символьную строку, состоящую из 45 символов ‘#’.
3.
Составить программу,
формирующую символьную строку, состоящую из 12 символов ‘@’ .
4.
Составить программу,
формирующую символьную строку, состоящую из 75 символов ‘$’.
5.
Составить программу,
формирующую символьную строку, состоящую из 26 символов ‘%’.
6.
Составить программу,
формирующую символьную строку, состоящую из 23 символов ‘?’.
7.
Составить программу,
формирующую символьную строку, состоящую из 14 символов ‘14’.
8.
Составить программу,
формирующую символьную строку, состоящую из 16 символов ‘()’.
9.
Составить программу,
формирующую символьную строку, состоящую из 5 символов ‘10А’.
10.
Составить программу,
формирующую символьную строку, состоящую из 15 символов ‘+’.
Часть III.
1.
Дана
строка произвольной длины. Подсчитать, сколько раз в ней встречается буква
‘a’. Определить длину текущей строки.
2.
Дана
строка произвольной длины. Получить новую строку из первоначальной строки без
cимвола ‘а’.
Практическая работа № 5. Табличный тип данных в Паскале.
Цель работы: знакомство с правилами обработки
линейных таблиц средствами системы программирования Турбо - Паскаль.
Формирование навыков по составлению программ,
работающих со структурированным типом данных. Отработка
навыков по работе в системе
программирования Турбо – Паскаль, компиляция и выполнение
написанной программы.
Дана линейная таблица. Организовать заполнение массива данными с
клавиатуры, подсчет суммы элементов таблицы и нахождение наибольшего и наименьшего значений элементов таблицы.
Таблица правильных ответов.
(нахождение суммы)
|
А
|
В
|
С
|
309,008
|
586,70
|
962,00
|
281,00
|
12598,00
|
843,00
|
507,45
|
1825,30
|
1272,00
|
608,00
|
996,00
|
2598,10
|
Часть 2.
1.
Вставить число
56 в 3 позицию данного массива.
2.
Вставить число
48 в 4 позицию данного массива.
3.
Вставить число
1 во 2 позицию данного массива.
4.
Вставить число
78 в 3 позицию данного массива.
5.
Вставить число
11 в 8 позицию данного массива.
6.
Вставить число
12 в 6 позицию данного массива.
7.
Вставить число
45 в 1 позицию данного массива.
8.
Вставить число
34 в 7 позицию данного массива.
9.
Вставить число
2 в 8 позицию данного массива.
10.
Вставить число
23 в 4 позицию данного массива.
Часть 3.
Поменять местами значения элементов вашего массива.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.