
- •Занятие №1: Программирование линейных алгоритмов.
- •1.1 Записать в Турбо Паскале арифметическое выражение:
- •1.2 Записать в виде алгебраической формулы:
- •2. Составить программу для вычисления значений переменных. Вывести значения вводимых исходных данных и результаты вычислений, сопровождая вывод наименованиями выводимых переменных.
- •Занятие №2: Программирование алгоритмов разветвляющейся структуры.
- •Составить программу для вычисления значений заданной функции, используя исходные данные. Выполнить проверку работы программы, значения аргумента выбрать самостоятельно.
- •Составить программу для вычисления значений заданной функции, используя исходные данные. Выполнить проверку работы программы, значения аргумента выбрать самостоятельно.
- •Вычислить значение функции, заданной графически. Рисунок графика выбрать в соответствии с номером своего варианта:
- •Занятие №3: Решение задач на составление программ разветвляющейся структуры. Решение уравнений и неравенств с использованием условного оператора.
- •Определить, имеется ли среди целых чисел a, b и с хотя бы одно четное.
- •Составить программу решения системы неравенств:
- •Занятие №4: Программирование циклических алгоритмов. Вычисление конечных сумм. Вычисление суммы бесконечного ряда. Табулирование функции.
- •1. Составьте программу, реализующую алгоритм вычисления суммы данного ряда.Записать результат работы программы при заданном значении аргумента.
- •3. Составить программу для вычисления суммы бесконечного ряда с погрешностью ε.
- •Занятие №5: Вычисление полиномов и их производных. Нахождение наибольшего и наименьшего значения функции.
- •В ычислить значения многочлена и его первую производную, используя формулу Горнера значения функции в заданном интервале с заданным шагом. Значения аргумента подобрать самостоятельно:
- •Найти наибольшее и наименьшее значения функции в заданном интервале с заданным шагом:
- •Занятие №6: Решение задач на использование комбинации операторов цикла и ветвления.
- •Чему равна знакочередующаяся сумма цифр числа n.
- •Даны натуральное число n и вещественное число X.Составить программу для вычисления:
- •Занятие №7: Программирование вложенных циклов
- •Занятие №8: Организация циклов в программе. Использование реккурентных соотношений
- •Занятие №9: Процедуры и функции
- •Составить программу для суммирования простых чисел из промежутка [m;n] . Использовать функцию, проверяющую является ли число простым.
- •Составить программу вычисления данного выражения: , где - функция нахождения максимального из двух чисел.
- •Заданы координаты вершин пятиугольника . Составить программу, определяющую периметр пятиугольника. Вычисление длин сторон оформить в виде функции по известной формуле: .
- •Составить программу упорядочивания последовательности 3 данных чисел X,y,z по убыванию с использованием подпрограммы-процедуры упорядочивания.
- •Занятие №10: Описание и использование одномерных массивов. Решение задач на обработку одномерных массивов.
- •1 . В одномерном массиве х, состоящем из n целых элементов, вычислить: a) количество элементов, удовлетворяющих условию ; b) сумму элементов, кратных 3.
- •3. Заданы два одномерных массива а и в размерности n. Составить программу, проверяющую, можно ли, меняя местами элементы одномерного массива а, получить одномерный массив в.
- •Занятие №11: Решение задач на обработку одномерных массивов. Использование массивов в качестве параметров в подпрограммах.
- •Занятие №12: Двумерные массивы.
- •Дана прямоугольная матрица размера m×n. Составить программу, которая находит столбцы с наибольшей и наименьшей суммой элементов. Вывести найденные столбцы и суммы их элементов.
- •С формировать квадратную матрицу по заданному образцу:
- •З анятие №13: Решение задач на обработку двумерных массивов. Использование матриц в качестве параметров в подпрограммах.
- •Для каждого столбца прямоугольной целочисленной матрицы определить сумму модулей его элементов, а затем сгруппировать столбцы в порядке возрастания этих сумм.
- •Занятие №14: Символьные переменные и строки. Обработка строк.
- •Дана строка. Удвоить каждую встречающуюся «о» и «а».
- •В заданном тексте удалить из текста пробелы и подсчитать длину сформированного текста.
- •Заняите №15: Решение задач обработки строк
- •Строка содержит произвольные символы таблицы ascii. Удалить из строки все цифры и повторить дважды каждый символ, кроме пробела, не являющийся цифрой. Просмотр строки осуществлять один раз.
- •Занятие №16: Понятие о файловом типе. Типы файлов. Процедуры и функции для работы с файлами.
- •Создать файл, состоящий из n целых чисел. Вывести содержимое этого файла на экран.
- •Н айти количество нечётных отрицательных элементов файла, созданного в задании 1, и полученный результат записать в новый файл.
- •З анятие №17: Записи. Обработка массива записей.
- •З анятие №18: Работа с файлами. Решение задач.
- •Дан текстовый файл f1. Переписать в обратном порядке его строки в файл f2. Содержимое файла f1 в оперативную память не копировать (в виде массива, стека, очереди и т.П.).
- •Занятие №19: Модули. Использование стандартных модулей.Работа с модулем Graph.
- •Исследовать область определения функции и построить график функций:
- •Построить кривые по заданному параметрическому представлению или заданному в полярных координатах:
- •Занятие №20: Вычисление определённого интеграла методом прямоугольников.
- •Занятие №21: Программирование операций с типами множеств
- •Занятие №22: Программирование задач с использованием динамических переменных.
- •Составить программу, которая вводит в память 12 целых чисел и находит количество элементов списка, кратных 3.
- •Занятие №23: Создание оконного интерфейса
- •Вычислить произведение трёх наименьших элементов отсортированного по возрастанию массива f(14)
- •Занятие №24: Создание интерфейса в виде меню
- •Создать прогамму, которая исполняет вывод на экран дисплея меню согласно предложенному варианту.
- •Занятие №25: Использование процедур и функций в работе с массивами.
- •В каждом из массивов а, в и с найти максимальный по модулю элемент и вычесть его из каждого элемента соответствующего массива
- •В каждом из массивов а(5), в(6) и с(7) найти максимальный по модулю элемент.
Занятие №16: Понятие о файловом типе. Типы файлов. Процедуры и функции для работы с файлами.
Создать файл, состоящий из n целых чисел. Вывести содержимое этого файла на экран.
program prac1;
const N=10;
var f:file of integer;
t:integer;
begin
assign(f,'c:\lab_15_1.int');
rewrite(f);
repeat
readln(t);
write(f,t);
until filepos(f)=N;
seek(f,0);
writeln('___________');
repeat
read(f,t);
writeln(t);
until eof(f);
close(f);
writeln('Vipolnil Kovrigin Anatoliy');
readln;
end.
Н айти количество нечётных отрицательных элементов файла, созданного в задании 1, и полученный результат записать в новый файл.
program prac2;
var f:file of integer;
c,t:integer;
begin
assign(f,'c:\lab_15_1.int');
reset(f);
repeat
read(f,t);
if ((t shr 1) shl 1<>t) and (t<0) then inc(c);
until eof(f);
close(f);
assign(f,'c:\lab_15_2.int');
rewrite(f);
write(f,c);
close(f);
readln;
end.
Организовать файл записей PRICE, содержащих следующие поля: название товара, название магазина, в котором продаётся товар, стоимость товара в гривнах. Написать программу, выполняющую следующие действия: Ввод с клавиатуры данных о нескольких товарах, вывод на экран информации о товаре, название которого введено с клавиатуры, если таких товаров нет, выдать соответствующее сообщение.
program prac3;
label z;
type string50=string[50];
tvr = record
n:string50;
m:string[40];
p:real;
end;
var f:file of tvr;
t:tvr;
i:integer;
q:string50;
begin
assign(f,'c:\lab_15_3.rec');
rewrite(f);
readln(i);
while i>=1 do
begin
writeln('Vvedite nazv tovara');
readln(t.n);
writeln('Vvedite cenu');
readln(t.p);
writeln('Vvedite magazin');
readln(t.m);
dec(i);
write(f,t);
end;
seek(f,0);
writeln('Vvedite nazv tovara');
readln(q);
repeat
read(f,t);
if t.n=q then
begin
writeln('nazv tovara - ',t.n);
writeln('cena tovara - ',t.p:0:2);
writeln('magazin - ',t.m);
goto z;
end;
until eof(f);
writeln('takih tovarov net');
z:
close(f);
readln;
end.
З анятие №17: Записи. Обработка массива записей.
Описать запись с именем PRICE, содержащую следующие поля: название товара, название магазина, в котором продаётся товар, стоимость товара в гривнах. Написать программу, выполняющую следующие действия.Ввод с клавиатуры данных в массив, состоящий из десяти записей типа PRICE, вывод на экран информации о товаре, название которого введено с клавиатуры, если таких товаров нет, выдать соответствующее сообщение. Упорядочить записи по алфавиту (название товара).
program prac3;
label z;
const N=10;
type string50=string[50];
price = record
n:string50;
m:string[40];
p:real;
end;
var f:array[1..N] of price;
i:integer;
q:string50;
begin
i:=N;
repeat
writeln('Vvedite nazv tovara');
readln(f[i].n);
writeln('Vvedite cenu');
readln(f[i].p);
writeln('Vvedite magazin');
readln(f[i].m);
dec(i);
until i=0;
writeln('Vvedite nazv tovara');
readln(q);
i:=N;
repeat
if f[i].n=q then
begin
writeln('nazv tovara - ',f[i].n);
writeln('cena tovara - ',f[i].p:0:2);
writeln('magazin - ',f[i].m);
goto z;
end;
dec(i);
until i=0;
writeln('takih tovarov net');
z:
readln;
end.