- •Основы программирования
- •Учебное пособие и методические указания по выполнению практических занятий для студентов специальностей:
- •Isbn 966-7508-285
- •7.080401 – Информационные управляющие системы и технологии
- •Isbn 966-7508-285
- •Оглавление
- •Введение
- •Часть I. Основы вычислительной техники, алгоритмизации и программирования;
- •Часть II. Алгоритмизация информационных процессов;
- •Часть III. Алгоритмический язык с.
- •1. Краткие теоретические сведения
- •1.1. Структурно-функциональная организация среды пакета Turbo-Pascal
- •1.2. Среда программирования пакета Turbo-Pascal
- •1.3. Технология работы с текстовым редактором
- •1.4. Прогон и отладка программы
- •1.5. Алгоритмизация вычислительных процессов
- •1.6. Структура программы на языке Тurbo-Pascal
- •1.7. Типы данных
- •1.8. Выражения и стандартные функции
- •1.9. Массивы и записи
- •Var mas: array[1..2,1..3] of integer;
- •1.10. Основные операторы
- •1.11. Процедуры и функции
- •1.12. Работа с файлами
- •2. Методические указания к практическим занятиям
- •2. Текст программы:
- •2. Тексты программ:
- •2. Тексты программ:
- •2. Текст программы:
- •2. Текст программы:
- •2. Текст программы:
- •2. Текст программы:
- •Приложения Основные символы схем алгоритмов
- •Список рекомендуемой литературы
2. Текст программы:
PROGRAM z2;
CONST
k=2; (* поименованная константа *)
VAR
x,y:REAL; (* аргумент и функция *)
BEGIN
WRITE(‘Введите значение аргумента — ’);
READ(x);
IF (x>=0) AND (х<=1) THEN
BEGIN
y:=SIN(k*x);
WRITELN(‘x=’,x, ‘y=’,y);
END
ELSE
WRITELN(‘Значение аргумента вышло за интервал 0-1’);
END.
3. Схема алгоритма задачи 2
Вывод
результата
X
– аргумент
S
– сумма
K
– коэффициент
Объявление
переменных
Ввод
значения
Задача 3
1. Условие: Составить схему алгоритма и написать ВР-программу вычисления и вывода на экран дисплея таблицы значений заданной функции (см. табл. П. 1) при изменении значения аргумента в интервале от 0 до 1 с шагом 0.1.
Пример: функция – sin2x.
Вид таблицы:
x |
y |
} заголовок |
0.0 |
0.541 |
т аблица |
0.1 |
0.123 |
|
· · · |
||
1.0 |
0.789 |
} окончание |
2. Тексты программ:
PROGRAM z31;
(* 1-й способ с оператором цикла FOR *)
CONST
k=2; (* поименованная константа *)
str=‘*************************************’;
(* строка символов *)
VAR
x,y:REAL; (* аргумент и функция *)
i:INTEGER; (* переменная цикла *)
BEGIN
WRITELN(str);
WRITELN(‘* x * у *’);
WRITELN(str);
х:=0.0;
FOR i:=1 TO 11 DO
BEGIN
y:=SIN(k*x);
WRITELN (‘*’, x:17:8,‘*’, y:18:8,‘*’);
x:=x+0.1;
END;
WRITELN (str);
END.
3а) Схема алгоритма задачи 3 (1-й способ (цикл FOR))
X
– имя аргумента
Y
– имя функции
K
– коэффициент
I
– счетчик
циклов
Объявление
переменных
Печать
строки
Печать
заголовка
Печать
окончания
PROGRAM z32;
(* 2-й способ с оператором цикла WHILE *)
CONST
k=2; (* поименованная константа *)
str=‘*************************************’;
(* строка символов *)
VAR
x,y:REAL; (* аргумент и функция *)
BEGIN
WRITELN(str);
WRITELN(‘* x * у *’);
WRITELN(str);
х:=0.0;
WHILE х<1.1 DO
BEGIN
y:=SIN(k*x);
WRITELN(‘*’, x:17:8, ‘*’, y:18:8, ‘*’);
x:=x+0.1;
END;
WRITELN(str);
END.
3б) Схема алгоритма задачи 3 (2-й способ (цикл WHILE))
X
– имя аргумента
Y
– имя функции
K
– коэффициент
Объявление
переменных
Печать
строки
Печать
заголовка
Печать
окончания
PROGRAM z33;
(* 3-й способ с оператором цикла REPEAT *)
CONST
k=2; (* поименованная константа*)
str=‘*************************************’;
(* строка символов *)
VAR
x,y:REAL; (* аргумент и функция *)
BEGIN
WRITELN(str);
WRITELN(‘* x * у *’);
WRITELN(str);
х:=0.0;
REPEAT
y:=SIN(k*x);
WRITELN(‘*’, x:17:8, ‘*’, y:18:8, ‘*’);
x:=x+0.1;
UNTIL x>l.l;
WRITELN(str);
END.
3в) Схема алгоритма задачи 3 (3-й способ (цикл REPEAT))
X
– имя аргумента
Y
– имя функции
K
– коэффициент
Объявление
переменных
Печать
строки
Печать
заголовка
Печать
окончания
Задача 4
1. Условие: Составить схему алгоритма и написать ВР-программу вычисления суммы бесконечного ряда для заданного значения переменной и формулы общего члена ряда (см. табл. П. 1). Предусмотреть завершение суммирования и печать результата при достижении очередным членом ряда абсолютной величины, меньшей, чем 0.0001.
Пример: значение переменной – 0.1;
Формула общего члена ряда