Документ: Паскаль. типы данных, операторы. методические указания для самостоятельной работы по дисциплине «Информатика». Кононов А.Д., Кононов А.А, страницы 41-45

3. Составить программу, которая вводит символ и выводит на экран его код

program char_code; const cr = 13;

var ch : char; begin

repeat

writeln (‘ введите символ’); readln (ch);

write (ch, ‘ = ‘, ord (ch)) until ord (ch) = cr

end.

Оператор цикла repeat повторяет команды тела цикла до тех пор, пока условие, записанное после until, не станет истинным, то есть для завершения работы программы нужно дважды нажать ENTER.

Контрольные вопросы и упражнения

1. Определите значение переменной s после выполнения следующих операторов:

s := 0; i := 2;

repeat s := s+1 / i; i := i – 1 until i < 1;

2.Пользуясь оператором repeat, описать вычисление f.

3.Определить какое количество последовательных натуральных чисел необходимо сложить, чтобы их сумма превысила 200.

3.5.РАБОТА С ЭВМ

3.5.1. Циклический вычислительный процесс

Цель задания – получение навыков в использовании операторов цикла (тип цикла по указанию преподавателя).

Постановка задачи.

Составить программу вычисления функции f (x) на отрезке [a, b]

(b a)

в точках xi = a + ih, где h = m , m – заданное число.

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

1.Постановка задачи (вариант).

2.Текст программы.

3.Таблица результатов.

39

4. Анализ результатов и допущенных ошибок.

Методические рекомендации

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

2.Значение шага h должно вычисляться один раз.

3.При изменении значения аргумента х использовать оператор присваивания x := x + h, а не операцию умножения x := a + i * h, что существенно сокращает время выполнения программы.

	Варианты заданий									Таблица 1
	Варианты заданий

№	Табулируемая функция					Параметры
№	Табулируемая функция				a				b		m
1	x – sinx			0							10
							2

2	sinx										15
				4			2
3	cosx							2			20
				3			3
4	arcsinx			0			1				20
5	arccosx			0.5			1				10
				0.5			1
6	arctgx			2			7				15

7	sinx - cosx			0							20

							2
8	x sinx			0			3				10
9	1						2				15
	sin
			x
			x	8
10	1						4				20
	cos
			x
			x	4
11	sin(x2 )							2			10
				6			3
12	cos(x2 )							3			15
				3			2
13	tg	x		0				2			15
		2
		2					3

40

3.5.2. Разветвление в цикле

Составить программу для вычисления y c оператором цикла и номером варианта по указанию преподавателя.

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

Варианты к выполнению задания 3.5.2

Таблица 2

№

Табулируемая функция

Пределы

Шаг

варианта

изменения х

lnx,

0 x 1

0

y

x 1

[ -1,3; 1,8 ]

0,2

4sin x 1,

x 0

h x,

1

x 5x3 ,

x 0,5

[ -1; 0,8 ]

0,1

0 x 0,5

y ln x,

x 0

n x,

2

sin 2x 1 ,

x 4

[ 3,0; 7,5 ]

0,25

2

y

x,

4 x 6

x

3ln x,

x 6

3

sin x2 ,

x 1

[ -5; 10,1 ]

0,9

y

6 x

cos 2x,

4x,

1 x 6

4

sin x,

x 20

[ 0,5; 25 ]

1,5

x,

5 x 20

y

2

x,

x 5

cos

5

15x 7,

4 x

[ 0; 5,1 ]

0,25

20x

2

,

x 1

y

4ln x,

1 x 4

41

Продолжение табл. 2

№

Табулируемая функция

Пределы

Шаг

варианта

изменения х

6

cos

x2 ,

x 2

[ -3,4; 14,7 ]

1

2 x 9

y x3 ,

x ,

x 9

sin

7

ln x 5 ,

x 6

[ -4,8; 10,4 ]

0,91

y

x 2

sin x r,

6 x 2

cos x,

x

2

,

x 0,5

8

3

[ -2,3; 1,2 ]

0,2

x

1

x 1

y cos3 x4,

u

,

1 x 0,5

2

5

x

,

1 x 4

9

34

[ -3; 7,2 ]

0,82

x 1

y cos x 5 ,

lnx

,

x 4

2

x

x tg

,

x 2

x

2

10

y ctg

cosx,

1 x 0

[ -4.8, 3.6]

0.4

3

2

x 1

x 4x 7,

ln(x 1),

x 2

1 x 2

11

y cosx ctgx,

[ -3, 6]

0.5

x 1

cos(x 1),

42

Продолжение табл. 2

№

Табулируемая функция

Пределы

Шаг

варианта

изменения х

9

1,

0 x 1

3x

x

y

x 0

12

cos

1.8,

[ -2, 3.5]

0.5

4

x 1

cosx lnx,

sinx

x

,

0 x 4

x

13

[ -2, 8 ]

0.8

x

y 9x

ctg

,

x 0

2

x 4

1 ln(x 1),

4

5x 1,

x 0

x

14

[ -6, 3]

1.0

y 3cosx,

3 x 0

x 3

cosxsinx,

БИБЛИОГРАФИЧЕСКИЙ СПИСОК

1.Гильмутдинов В.И. Информатика: учеб. пособие / В.И. Гильмутдинов, А.Д. Кононов, А.А. Кононов. – Воронеж: ВГАСУ, 2010. – 56 с.

2.Кононов А.Д. Информатика: учеб. пособие / А.Д. Кононов, А.А. Кононов. – Воронеж: ВГАСУ, 2016. – 53 с.

3.Кононов А.Д. Основы программирования на языке Паскаль: учебное пособие / А.Д. Кононов, А.А. Кононов. – Воронеж: ВГТУ, 2017. – 53 с.

4.Кудинов Ю.И. Основы современной информатики / Ю.И. Кудинов, Ф.Ф. Пащенко. – М: Лань, 2010. – 256 с.

5.Могилев А.В. Информатика: учеб. пособие для пед. вузов / А.В. Могилев, Н.И. Пак, Е.К. Хеннер. – М.: Академия, 2004. – 848 с.

6.Окулов С.М. Основы программирования / С.М. Окулов. – М.: БИНОМ, 2013. – 440 с.

7.Хлебников А.А. Информатика: учебник / А.А. Хлебников. – Ростов н/Д: Феникс, 2013. – 443 с.

43

Материал: Паскаль. типы данных, операторы. методические указания для самостоятельной работы по дисциплине «Информатика». Кононов А.Д., Кононов А.А

Смотрите также: