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

Тема: Программирование алгоритмов циклической структуры.

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

Оборудование: ПК, методические пособия.

Краткие сведения из теории.

Цикл – это многократно выполняемая последовательность действий (операторов)

В языке Pascal циклы могут быть организованы с помощью оператора цикла с параметром.

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

Оператор цикла с параметром в общем виде:

FOR Х:=А TO В DO

Begin

(Операторы циклической части программы);

END;

FOR(для), TО(до), DO(выполнить) – служебные слова

Х – параметр цикла (переменная целого типа – integer)

А – начальное значение параметра цикла

В – конечное значение параметра цикла

Если циклическая часть программы содержит только 1 оператор, то операторные скобки Begin–End можно не писать.

Образец решения задачи:

1. Условие:

Составить программу для вычисления значений функции y=3mx+tgx. Аргумент функции x изменяется от 1 до 5 c шагом 1, а аргумент m=2. Результат представить в виде таблицы, первые два столбца которой – значения аргумента, третий – соответствующие значения функции.

2. Математическая модель:

Цикл с параметром. Аргумент х изменяется от 1 до 5 с шагом 1.

Тело цикла содержит 2 действия – 2 оператора.

3. Блок-схема:

4. Программа:

Program primer;

Var x:integer;

m,y:real;

begin

m:=2;

for x:=1 to 5 do

begin

y:=3*m*x*+sin(x)/cos(x);

writeln(’m=’,m,’x=’,x,’y=’,y);

end;

end.

5. Результаты:

m= 2 x=1 y= 7.5574077247≈7.56

m= 2 x=2 y= 9.8149601367≈9.81

m= 2 x=3 y= 17.857453457≈17.86

m= 2 x=4 y= 25.157821282≈25.16

m= 2 x=5 y= 26.619484994≈26.62

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

1. Ознакомится с целью и содержанием работы.
2. Составить алгоритм в виде блок-схемы и программу решения одного из вариантов заданий, приведённых ниже.

Вариант 1

1. Составить программу для вычисления значений функции
f=3е^2хsin²( k+1). Аргумент функции x изменяется от 0 до 10 c шагом 1, а аргумент k=3. Результат представить в виде таблицы, первые два столбца которой – значения аргумента, третий – соответствующие значения функции.

2. Вычислить и вывести на печать сопротивление алюминиевого проводника R, включенного в цепь, если площадь его поперечного сечения S=14мм², удельное сопротивление р=2,7•10^-8 Ом •м, а длина L изменяется от 35 м до 45 м с шагом 1. ( )

3. Найти сумму квадратов чисел от 5 до 55.

Вариант 2

1. Составить программу для вычисления значений функции
g=5e^4x сos²( n+0,5). Аргумент функции x изменяется от 10 до 20 c шагом 1, а аргумент n=7. Результат представить в виде таблицы, первые два столбца которой – значения аргумента, третий – соответствующие значения функции.

2. Вычислить силу тока на участке цепи без ЭДС, если напряжение на данном участке 30В, а сопротивление меняется на данном участке от 15 Ом до 25 Ом с шагом 1.

3. Найти произведение квадратов чисел от 1 до 5.