- •Основы программирования
- •Учебное пособие и методические указания по выполнению практических занятий для студентов специальностей:
- •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 z8;
VAR mas:ARRAY[1..10] OF INTEGER; (* массив *)
i,kol,buf:INTEGER; (* индекс цикла, количество, буфер *)
f:TEXT; (* файл *)
BEGIN
ASSIGN(f,‘f.txt’);
REWRITE(f);
WRITELN(‘Введите значения элементов массива’);
FOR i:=1 TO 10 DO
BEGIN
READ(buf);
WRITELN(f,buf);
END;
RESET(f);
kol:=0;
FOR i:=1 TO 10 DO
BEGIN
READLN(f,mas[i]);
IF mas[i]>0 THEN kol:=kol+1;
END;
CLOSE(f);
IF kol>0 THEN
WRITELN(‘Кол-во положительных эл-ов в массиве =’,kol:2)
ELSE
WRITELN(‘Положительных элементов в массиве нет’)
END.
3. Схема алгоритма задачи 8
mas
– массив чисел
i
– индекс массива
KOL
– количество положи-тельных чисел в
массиве
BUF – буферная
переменная
F
– имя файла
Открытие
файла
Объявление
переменных
Настройка
на запись в файл
Запись
в файл
Настройка
на считывание из файла
Считывание
из файла
Закрытие
файла
Вывод
результатов
Приложения Основные символы схем алгоритмов
Выполнение схем алгоритмов регламентируется ГОСТ 19.008-80 «ЕСПД. Схемы алгоритмов и программ. Правила выполнения».
Для изображения схем алгоритмов используются следующие графические символы:
|
процесс – выполнение операций или группы операций, в результате которых изменяются значения, форма представ-ления или расположение данных; |
|
решение – выбор дальнейшего направ-ления выполнения алгоритма в зависимости от заранее определенных условий; |
|
модификация – выполнение операций, меняющих команду или группу команд, изменяющих программу; |
|
предопределенный процесс – ис-пользование ранее созданных и отдельно описанных алгоритмов; |
|
ввод-вывод – преобразование данных в форму, пригодную для обработки (ввод) или отображения результатов обработки (вывод); |
|
пуск-останов – начало, конец, пре-рывание процесса обработки данных |
Таблица П. 1
№ п/п |
Значение переменной |
Заданное выражение |
Формула общего члена ряда |
1 |
0.9 |
exp(х) |
|
2 |
0.6 |
cos(x) |
|
3 |
0.5 |
|
|
4 |
0.2 |
|
|
5 |
0.2 |
|
|
6 |
0.4 |
|
|
7 |
0.7 |
|
|
8 |
0.4 |
|
|
9 |
0.4 |
|
|
10 |
0.6 |
|
|
11 |
0.3 |
|
|
12 |
0.2 |
|
|
Таблица П. 2
№ п/п |
Результат обработки |
1 |
Сумма всех положительных элементов массива |
2 |
Количество элементов массива, больших 50 |
3 |
Среднее арифметическое значение всех отрицательных элементов массива |
4 |
Сумма положительных элементов массива, имеющих нечетные номера |
5 |
Количество элементов массива, значения которых делятся нацело на 2 |
6 |
Элементы массива, значения которых больше 50 |
7 |
Сумма всех отрицательных элементов массива, имеющих четные номера |
8 |
Количество элементов массива, имеющих нечетные значения |
9 |
Количество элементов массива, значения которых лежат в диапазоне от 25 до 75 |
10 |
Сумма элементов массива, значения которых по модулю меньше 25 |
11 |
Элементы массива, имеющие четные значения |
12 |
Количество элементов массива, значения которых кратны 10 |
Таблица П. 3
№ п/п |
Результат обработки |
1 |
Фамилия самого старшего студента |
2 |
Список отличников |
3 |
Список студентов, не имеющих пропусков занятий |
4 |
Список хорошистов |
5 |
Список двоечников |
6 |
Фамилия студента, имеющего наибольшее количество пропусков занятий |
7 |
Список студентов, которым в этом году исполняется 20 лет |
8 |
Средний бал сдачи студентами первого экзамена |
9 |
Средний бал сдачи студентами сессии |
10 |
Список студентов, получивших тройки по третьему экзамену |
11 |
Средний возраст студентов группы |
12 |
Список однофамильцев, при условии, что фамилия-эталон вводится с экрана дисплея |