- •Пояснительная записка
- •Программирование на алгоритмическом языке pascal
- •«Ознакомление с работой в интегрированной среде Borland Pascal»
- •Задание 1
- •Ход работы:
- •Загрузите систему Borland Pascal.
- •После входа в систему появляется рабочий экран (рис. 2).
- •Изучите пункты главного меню.
- •Задание 2
- •Методические указания к лабораторным занятиям для учащихся.
- •Лабораторная работа №1
- •Вопросы для самоподготовки:
- •Краткие теоретические сведения
- •Задание 1
- •Ход выполнения работы.
- •Задание 2
- •Лабораторная работа №2
- •Краткие теоретические сведения
- •Правила работы с условным оператором.
- •Вопросы для самоподготовки:
- •Задание 1
- •Задание 2.
- •Задание 3
- •Правила организации цикла с параметром.
- •Вопросы для самоподготовки:
- •Задание 1
- •Задание 2
- •Решение:
- •Задачи для самостоятельного решения.
- •Лабораторная работа №4. Тема: «Разработка, отладка и испытание простых циклических алгоритмов и программ с неизвестным числом повторений».
- •Краткие теоретические сведения
- •Вопросы для самоподготовки:
- •Задание 1
- •Решение:
- •Задание 2
- •Домашнее задание
- •Вопросы для самоподготовки:
- •Определим необходимые формулы:
- •Составим графическую схему алгоритма.
- •Составим таблицу соответствия переменных.
- •В соответствии с пунктами 2 и 3 составьте программу.
- •Задание 2
- •Задание 3
- •Решение:
- •Составим графическую схему алгоритма:
- •Составим таблицу соответствия переменных
- •Составим программу на языке Pascal.
- •Задание 4
- •Лабораторная работа №6. Тема: «Разработка, отладка и испытание циклических алгоритмов и программ с известным числом повторений с внутренними ветвлениями».
- •Задание
- •Задание 2
- •Решение:
- •Задание 3
- •Решение:
- •Задание 4 (задачи повышенной сложности)
- •Решение:
- •Задания для самостоятельного решения. Напишите программы с использованием процедур.
- •Дана последовательность слов. Напечатайте все слова, предварительно преобразовав каждое из них по следующему правилу:
- •Задание 5
- •Решение:
- •Задание 8 (повышенной сложности)
- •Решение:
- •Задание для самостоятельного решения:
- •(Повышенной сложности)
- •Лабораторная работа №8. Тема: «Разработка алгоритмов и программ методом пошаговой детализации. Обработка двумерных массивов. Организация ввода-вывода с помощью текстовых файлов».
- •Вопросы для самоподготовки:
- •Краткие теоретические сведения
- •Задание 1
- •Задание 2
- •Решение:
- •Составим графическую схему алгоритма.
- •Составляем таблицу соответствия переменных.
- •Составляем программу на языке программирования Pascal.
- •Задание 3
- •Задание 4
- •Лабораторная работа №9. Тема: «Разработка алгоритмов и программ решения различных задач с использованием библиотечных модулей пользователя».
- •Краткие теоретические сведения
- •Задание
- •Задача для самостоятельного решения.
- •Лабораторная работа №10. Тема: «Разработка алгоритмов и программ обработки строк. Использование множеств для решения задач».
- •Вопросы для самоподготовки:
- •Задание 6
- •Решение:
- •Задачи для самостоятельного решения:
- •Лабораторная работа №11. Тема: «Разработка алгоритмов и программ с использованием методов внутренней сортировки».
- •Задание
- •Решение:
- •Для каждой команды в одной строке введите через пробел
- •Задание для самостоятельного решения:
- •Лабораторная работа №12. Тема: «Разработка рекурсивных алгоритмов и программ».
- •Краткие теоретические сведения
- •Задание.
- •Лабораторная работа №13. Тема: «Разработка алгоритмов и программ с использованием процедур и функций модулей crt и dos».
- •Краткие теоретические сведения
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание.
- •Краткие теоретические сведения
- •Решение:
- •Задание 2
- •Андреев
- •Задание для самостоятельного решения.
- •Лабораторная работа №16. Тема: «Разработка алгоритмов и программ с использованием динамических структур данных».
- •Краткие теоретические сведения
- •Задание
- •Задание для самостоятельного решения
- •Задача о «Ханойских башнях».
- •Решение:
- •Задания для самостоятельного решения.
- •Задание для самостоятельного решения:
- •Задания для самостоятельного решения:
- •Лабораторная работа №22. Тема: «Разработка программ обработки созданных файлов».
- •Постановка задачи
- •Содержание отчета
- •Варианты задания:
- •Лабораторная работа №23. Тема: «Разработка программ с использованием прерываний bios и dos, процедурных типов».
- •Краткие теоретические сведения
- •Константы
- •Задание
- •Задание для самостоятельного решения.
- •Лабораторная работа №25. Тема: «Разработка простейших программ с использованием компонентов страницы Standart».
- •Вопросы для самоподготовки:
- •Задание 1
- •Лабораторная работа №26. Тема: «Разработка программ обработки массивов с использованием компонентов страницы Standart».
- •Задание
- •Procedure tForm1.Button2Click (Sender: tObject); {обработка массива}
- •Лабораторная работа №32. Тема: «Разработка программ создания и использования мультимедийных возможностей».
- •Задание
- •Лабораторная работа №34. Тема: «Создание и использование справочной системы».
- •Краткие теоретические сведения
- •Задание
- •Ход работы:
- •Лабораторная работа №35. Тема: «Создание установочного диска».
- •Задание
Составляем программу на языке программирования Pascal.
Program matrica;
var
N, i, j, p: integer;
a: array[1..10, 1..10] of integer;
begin
writeln (‘Введите количество строк и столбцов’);
readln (N);
writeln (‘Введите значения элементов матрицы’);
for j:=1 to N do
for i:=1to N do
begin
write (‘Введите A(‘, I, ‘,’, Y,’)=’);
readln (A[i,j])
end;
for i:=1to N do
begin
p:=a[i,i]
a[i,i]:=a[i, N-i+1];
a[i, N-i+1]:=p
end;
for j:=1 to N do
begin
for i:=1 to N do
write (A[i,j]:5);
writeln
end;
readln
end.
Задание 3
В соответствии со своим вариантом составьте графическую схему алгоритма и напишите программу с организацией ввода-вывода с помощью текстовых файлов.
В каждой задаче задается квадратная матрица NxN. Программа должна осуществлять ввод и печать исходной матрицы и возможно, дополнительных данных, произвести необходимые действия и напечатать результаты.
Вариант |
Задание |
1 |
Подсчитать количество положительных чисел, лежащих выше главной диагонали. |
2 |
Вычислить сумму отрицательных элементов, лежащих ниже главной диагонали. |
3 |
Вычислить произведение чисел, принадлежащих промежутку A, B и лежащих на главной диагонали и выше ее. |
4 |
Вычислить сумму квадратов элементов, больших заданного С и находящихся на главной диагонали и ниже ее. |
5 |
Подсчитать количество чисел, меньших заданного D и находящихся выше побочной диагонали. |
6 |
Вычислить сумму положительных элементов, лежащих ниже побочной диагонали. |
7 |
Вычислить произведение отрицательных элементов, находящихся на побочной диагонали и выше ее. |
8 |
Вычислить сумму квадратов элементов, принадлежащих промежутку (Е, F] и лежащих на побочной диагонали и ниже ее. |
9 |
Вычислить среднее арифметическое элементов, больших заданного G и лежащих выше главной диагонали. |
10 |
Подсчитать количество чисел, меньших заданного H и лежащих ниже главной диагонали. |
11 |
Вычислить сумму чисел, принадлежащих промежутку [K, L) и лежащих на главной диагонали и выше ее. |
12 |
Вычислить произведение положительных чисел, лежащих на главной диагонали и ниже ее. |
13 |
Вычислить сумму квадратов отрицательных чисел, лежащих выше побочной диагонали. |
14 |
Вычислить среднее арифметическое чисел, небольших заданного M и лежащих ниже побочной диагонали. |
15 |
Подсчитать количество чисел, не меньших заданного P и лежащих на побочной диагонали и выше ее. |
16 |
Вычислить сумму чисел, больших заданного R и лежащих на побочной диагонали и ниже ее. |
17 |
Вычислить произведение чисел, меньших заданного Q и лежащих выше главной диагонали. |
18 |
Вычислить сумму квадратов положительных чисел, лежащих ниже главной диагонали. |
19 |
Вычислить среднее арифметическое отрицательных чисел, лежащих на главной диагонали и выше ее. |
20 |
Подсчитать количество отрицательных чисел, лежащих на главной диагонали и ниже ее. |
21 |
Вычислить сумму чисел, не больших заданного S и лежащих выше побочной диагонали. |
22 |
Вычислить произведение чисел, больших заданного Т и лежащих ниже побочной диагонали. |
23 |
Вычислить сумму квадратов положительных чисел, лежащих на побочной диагонали и выше ее. |
24 |
Вычислить среднее арифметическое чисел, принадлежащих заданному промежутку (У, F) и лежащих на побочной диагонали и ниже ее. |
25 |
Подсчитать количество чисел, принадлежащих промежутку [X,Y] и лежащих выше главной диагонали. |
26 |
Вычислить сумму чисел, не меньших заданного Z и лежащих ниже главной диагонали. |
27 |
Вычислить произведение не нулевых чисел, расположенных на главной диагонали и выше ее. |
28 |
Вычислить сумму квадратов чисел, меньших заданного А и лежащих на главной диагонали и ниже ее. |
29 |
Вычислить среднее арифметическое положительных чисел, лежащих выше побочной диагонали. |
30 |
Подсчитать общее количество чисел, меньших заданного А, и чисел, больших заданного В среди элементов, находящихся ниже побочной диагонали. |