-6A82E~1
.PDF
111
Индивидуальные задания
Вариант №1. Составить схему алгоритма и программу для задачи:
Вычислить сумму
100
конкретные суммы
x 1
n
x 1
x x
f (x) , вид функции заранее неизвестен. Вычислить
|
и |
50 |
5 |
|
. Результаты вывести в файл. |
5 |
|
|
lg x |
||
|
|||||
|
x 1 x2 |
|
|
||
Вариант №2. Составить схему алгоритма и программу для задачи:
Сложить две квадратные матрицы размером (n×n). Матрицы ввести с клавиатуры. Исходные и результирующие матрицы вывести в файл.
Вариант №3. Составить схему алгоритма и программу для задачи:
n
Вычислить произведение f (x) , вид функции заранее неизвестен. Вы-
x 1
10 15
числить конкретные значения tg(x) и lg(x 1) . Результаты вывести в
x 1 x 1
файл.
Вариант №4. Составить схему алгоритма и программу для задачи:
Умножить на скаляр квадратную матрицу размером (n×n). Матрицу и скаляр ввести с клавиатуры. Исходную и результирующую матрицы вывести в файл.
Вариант №5. Составить схему алгоритма и программу для задачи:
Вычислить произведение |
n |
|
f (x) , вид функции заранее неизвестен. Вы- |
||
|
x m |
15 |
числить конкретные значения |
20 |
|
ctg(x) и |
ln(x). Результаты вывести в файл. |
|
|
x 5 |
x 2 |
Вариант №6. Составить схему алгоритма и программу для задачи: Умножить на скаляр квадратную матрицу размером (n×n), затем сложить
ее со второй матрицей. Матрицы и скаляр ввести с клавиатуры. Исходные и результирующие матрицы вывести в файл.
Вариант №7. Составить схему алгоритма и программу для задачи:
|
|
|
n |
|
|
|
m |
|
|
|
Вычислить выражение |
f1(x) |
f2(x) , вид функций заранее неизвестен. |
||||||||
|
|
|
x 1 |
|
|
x 1 |
|
|
||
|
100 x 2 |
50 |
|
5 |
|
|
||||
Вычислить выражение |
|
|
|
|
|
|
|
ln x |
. Результаты вывести в файл. |
|
|
|
|
||||||||
|
x 1 x 5 |
x 1 x2 |
|
|
||||||
112
Вариант №8. Составить схему алгоритма и программу для задачи:
Умножить на различные скаляры квадратные матрицы размером (n×n), затем сложить их. Матрицы и скаляры ввести с клавиатуры. Исходные данные и результаты вывести в файл.
Вариант №9. Составить схему алгоритма и программу для задачи:
n
Вычислить выражение f1(x)
x k
Вычислить выражение 10 ln x 2 x 2 lg x 5
файл.
m |
|
|
|
|
|
|
f2(x), вид функций заранее неизвестен. |
||||||
x l |
|
|
|
|
|
|
15 |
|
5 |
|
|
. Результаты вывести в |
|
|
|
|
|
|
tg(x) |
|
|
|
|
||||
x 5 |
|
|
x |
|
|
|
Вариант №10. Составить схему алгоритма и программу для задачи:
Найти минимальный элемент главной диагонали квадратной матрицы размером (n×n). Рассчитать для двух различных матриц различных размеров. Исходные данные вводить с клавиатуры. Исходные данные и результаты вывести в файл.
Вариант №11. Составить схему алгоритма и программу для задачи:
|
n |
m |
|
|
|
||
Вычислить выражение |
f1(x) f2(x) , вид функций заранее неизве- |
||||||
|
x k |
x l |
|
|
|
||
|
10 |
20 |
x 1 |
|
|
||
стен. Вычислить выражение tg(x) |
|
. Результаты вывести в файл. |
|||||
|
|||||||
|
x 2 |
x 5 |
x 1 |
|
|||
|
|
|
|
|
|
|
|
Вариант №12. Составить схему алгоритма и программу для задачи:
Найти максимальный элемент главной диагонали и его индексы квадратной матрицы размером (n×n). Рассчитать для двух различных матриц различных размеров. Исходные данные вводить с клавиатуры. Исходные данные и результаты вывести в файл.
113
19 МОДУЛЬ CRT (лабораторная работа №8)
Типовая задача:
Вывести на экран окно следующего вида:
Причем первая строка должна иметь фон светло-серый, буквы черные; вторая – на каждый режим свой фон и свой цвет букв; третья – альтернативную (по отношению ко второй строке) расцветку букв и фона. Затем программа должна произвести 7 звуковых сигналов различной частоты. Программа должна закончить работу при нажатии клавиши “Enter”.
|
|
|
|
Программа |
|
Program PR8; {Familii} |
|
|
|
||
uses CRT; |
|
|
|
|
|
type Mas=array[1..3] of string[21]; |
|
||||
const stor:Mas=(' |
|
Rezim A |
', |
||
|
' |
|
Rezim B |
', |
|
|
' |
|
Rezim C |
'); |
|
Var i,j:integer; |
|
|
|
|
|
kod:char; |
|
|
|
|
|
BEGIN |
|
|
|
|
|
ClrScr; |
|
|
|
|
|
Window(5,1,67,3); |
|
|
|
|
|
ClrScr; |
|
|
|
|
|
TextBackGround(7); |
|
|
|
|
|
TextColor(0); |
|
|
|
|
|
Write('':23,'Vyberite rezim:','':23); |
|
||||
for i:=1 to 3 do begin |
|
|
|
||
TextBackGround(i); |
|
|
|
||
TextColor(i+1); |
|
|
|
|
|
j:=(i-1)*20+1; |
|
|
|
|
|
gotoxy(j,2); |
|
|
|
|
|
write(stor[i]); |
|
|
|
|
|
TextBackGround(i+1); |
|
|
|
||
TextColor(i); |
|
|
|
|
|
gotoxy(j,3); |
|
|
|
|
|
write(' |
1 |
2 |
3 |
'); |
|
end; |
|
|
|
|
|
for i:=1 to 7 do begin Sound(100*i); Delay(5000);
end;
Nosound; repeat
kod:=readkey; until kod=#13
End.
114
Индивидуальные задания
Вариант №1. Вывести на экран дисплея окно следующего вида:
┌───────────────────────────┐
│ |
Выберите |
режим: |
│ |
│ |
Режим |
1 |
│ |
│ |
Режим |
2 |
│ |
│ |
Режим |
3 |
│ |
└───────────────────────────┘
Причем окно должно иметь фон светло-серый; первая строка – буквы черные; вторая - буквы голубые; третья - буквы зеленые; четвертая – буквы бирюзовые. Затем программа должна произвести звуковые сигналы из 3 нот. Программа должна закончить работу при нажатии клавиши "пробел".
Вариант №2. Вывести на экран дисплея окно следующего вида:
┌────────────────────────────┐
│ Для выхода из |
меню нажмите │ |
||
│ |
Esc |
|
│ |
│ |
Опция |
1 |
│ |
│ |
Опция |
2 |
│ |
└────────────────────────────┘
Причем окно должно иметь фон светло-серый; первая, третья и четвертая строки – буквы черные; вторая – буквы красные. Затем программа должна произвести звуковой сигнал. Программа должна закончить работу при нажатии клави-
ши "Esc".
Вариант №3. Вывести на экран дисплея окно следующего вида:
┌───────────────────────────────────────────────────────────────┐
│ |
|
Выберите |
режим: |
|
(для выхода нажмите |
ESC) |
|
│ |
|||
│ |
|
Режим A |
|
|
|
Режим B |
|
|
Режим C |
|
│ |
│ |
1 |
2 |
3 |
|
1 |
2 |
3 |
1 |
2 |
3 |
│ |
└───────────────────────────────────────────────────────────────┘
Причем первая строка должна иметь фон светло-серый, буквы черные; вторая – на каждый режим свой фон и свой цвет букв; третья – альтернативную (по отношению ко второй строке) расцветку букв и фона. Затем программа должна произвести звуковой сигнал. Программа должна закончить работу при нажатии клавиши "Esc".
115
Вариант №4. Вывести на экран дисплея окно следующего вида:
┌───────────────────────────┐
│ |
Выберите режим: |
│ |
|
│ |
Режим 1 |
Режим 2 |
│ |
│ |
1-A |
2-A |
│ |
│ |
1-B |
2-B |
│ |
└───────────────────────────┘
Причем первая строка должна иметь фон светло-серый, буквы черные; вторая, третья и четвертая – разные цвета фона и букв для каждого режима. Затем программа должна произвести звуковые сигналы из 3 нот. Программа должна закончить работу при нажатии клавиши "пробел".
Вариант №5. Вывести на экран дисплея окно следующего вида:
┌───────────────────────────┐
│ |
Режим 1 |
Режим 2 |
│ |
│ |
1-A |
2-A |
│ |
│ |
1-B |
2-B |
│ |
└───────────────────────────┘
Причем первая строка должна иметь для каждого режима разные цвета фона и букв; вторая и третья – альтернативные цвета фона и букв для каждого режима. Затем программа должна произвести звуковые сигналы из 3 нот. Программа должна закончить работу при нажатии клавиши "пробел".
Вариант №6. Вывести на экран дисплея окно следующего вида:
┌───────────────────────────────────────────────────────────────┐
│ |
|
Выберите |
режим: |
|
(для выхода нажмите |
ESC) |
|
│ |
|||
│ |
|
Режим A |
|
|
|
Режим B |
|
|
Режим C |
|
│ |
│ |
1 |
2 |
3 |
|
1 |
2 |
3 |
1 |
2 |
3 |
│ |
└───────────────────────────────────────────────────────────────┘
Причем первая строка должна иметь фон светло-серый, буквы черные, в слове ESC – буквы красные; вторая – на каждый режим свой фон и свой цвет букв; третья – альтернативную (по отношению ко второй строке) расцветку букв и фона. Затем программа должна произвести звуковой сигнал. Программа должна закончить работу при нажатии любой клавиши.
116
20 МОДУЛЬ GRAPH (лабораторная работа №9)
Типовая задача:
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение выходящее за рамки окна отсекать). Закрасить окно белым фоном. Нарисовать окружность с центром в точке (100,100) и радиусом 50 красным цветом. Затем заштриховать окружность толстыми коричневыми линиями (\\\). Затем нарисовать прямоугольник (100x100) примерно в центре экрана белым цветом линией из точек и тире увеличенной толщины. В прямоугольнике написать слово «Ввод» малиновым цветом в горизонтальном направлении буквами, увеличенными в 2 раза.
Программа:
Program Lab_9_Tip;{familii} |
|
Uses Graph; |
|
Var Gd,Gm: integer; |
|
BEGIN |
|
Gd:=Detect; |
|
InitGraph(Gd,Gm,'c:\tp\bgi'); |
{Инициализация граф.режима} |
if GraphResult <> grOk then |
{Проверка состояния, в случае ошибки,} |
begin writeln(GraphResult); Halt(1);end; {остановка про-
граммы}
SetViewPort(0,0,GetMaxX,GetMaxY,True); {Организация окна в рамках
всего экрана} {Установка цвета фона (белый)} {Установка цвета рисования (красный)}
{Рисование окружности с центром в точке
(100,100) и радиусом 50} {Установка стиля штриховки толстыми коричневыми линиями (\\\)}
FloodFill(100,100,Red); {Штриховка установленным стилем области, ограниченной цветом Red и имеющей внутри т.(100,100)}
SetLineStyle(CenterLn,0,3); {Установка стиля линии (штрихпунктирной,
|
утолщенной)} |
SetColor(Green); |
{Установка цвета рисования (зеленый)} |
rectangle(300,200,400,300); {Рисование прямоугольника от верхнего ле-
|
|
вого угла (300,200) до нижнего правого – (400,300)} |
SetTextStyle(0,0,2); |
{Установка стиля текста – обычный шрифт, |
|
|
направление горизонтальное, буквы увеличены в 2 раза} |
|
SetColor(LightMagenta); |
{Установка цвета рисования (малиновый)} |
|
OuttextXY(320,240,'Vvod'); {Вывод текста (Vvod), начиная от точки |
||
|
|
(320,240)} |
readln; |
{Задержка выполнения программы до нажатия клавиши «Enter»} |
|
CloseGraph; |
|
{Закрытие графического режима} |
End. |
|
|
117
Схема алгоритма
118
Индивидуальные задания
Вариант №1.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно светло-серым фоном. Нарисовать окружность в верхнем левом углу экрана радиусом 40 красным цветом. Затем заштриховать окружность толстыми коричневыми линиями (\\\). Затем нарисовать прямоугольник (120х100) примерно в правом нижнем углу экрана фиолетовым цветом линией из точек и тире нормальной толщины. В центре экрана написать «Графический режим» малиновым цветом в вертикальном направлении буквами увеличенными в 3 раза.
Вариант №2.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно белым фоном. Нарисовать эллипс в верхнем правом углу экрана с полуосями 40 и 60 темно-серым цветом. Затем заштриховать эллипс красными линиями (///). Затем нарисовать прямоугольник (220х200) примерно в левом нижнем углу экрана желтым цветом линией из точек увеличенной толщины. В прямоугольнике написать «Прямоугольник» малиновым цветом в горизонтальном направлении буквами увеличенными в 2 раза.
Вариант №3.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно белым фоном. Нарисовать эллипс в нижнем правом углу экрана с полуосями 40 и 80 фиолетовым цветом. Затем заштриховать эллипс красными толстыми линиями (\\\). Затем нарисовать прямоугольник (20х200) примерно в левом верхнем углу экрана коричневым цветом линией из точек нормальной толщины. В прямоугольнике написать «Прямоугольник» малиновым цветом в вертикальном направлении обычными буквами.
Вариант №4.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно белым фоном. Нарисовать эллипс в верхнем правом углу экрана с полуосями 100 и 60 красным цветом. Затем заштриховать эллипс зелеными линиями (///). Затем нарисовать прямоугольник (120х50) примерно в левом нижнем углу экрана коричневым цветом линией из точек увеличенной толщины. В прямоугольнике написать «Прямоугольник» фиолетовым цветом в горизонтальном направлении буквами обычной высоты.
119
Вариант №5.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно светло-серым фоном. Нарисовать в верхнем правом углу экрана треугольник линиями красного цвета. Затем заштриховать его зелеными линиями (///). Затем нарисовать прямоугольник (120х50) примерно в левом нижнем углу экрана коричневым цветом линией из точек увеличенной толщины. В прямоугольнике написать «Прямоугольник» желтым цветом в горизонтальном направлении буквами обычной высоты.
Вариант №6.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана отсекать). Закрасить окно светло-зеленым фоном. Нарисовать окружность в верхнем левом углу экрана радиусом 50 красным цветом. Затем заштриховать окружность нормальными коричневыми линиями (\\\). Затем нарисовать прямоугольник (20х100) примерно в правом нижнем углу экрана фиолетовым цветом линией из точек и тире нормальной толщины. В центре экрана на писать «режим» малиновым цветом в вертикальном направлении буквами увеличенными в 3 раза.
Вариант №7.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно светло-серым фоном. Нарисовать в верхнем левом углу экрана прямоугольный треугольник линиями красного цвета. Затем заштриховать его зелеными линиями (\\\). Затем нарисовать окружность радиусом 50 примерно в правом нижнем углу экрана коричневым цветом сплошной линией увеличенной толщины. В окружности написать «Круг» желтым цветом в горизонтальном направлении буквами увеличенными в 2 раза.
Вариант №8.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно желтым фоном. Нарисовать эллипс в верхнем левом углу экрана с полуосями 80 и 150 красным цветом. Затем заштриховать эллипс зелеными линиями (///). Затем нарисовать прямоугольник (120х60) примерно в правом нижнем углу экрана коричневым цветом линией из точек увеличенной толщины. В прямоугольнике написать «Прямоугольник» фиолетовым цветом в горизонтальном направлении буквами обычной высоты.
120
Вариант №9.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно желтым фоном. Нарисовать в верхнем левом углу экрана прямоугольный треугольник линиями зеленого цвета. Затем заштриховать его красными линиями (\\\). Затем нарисовать окружность радиусом 100 примерно в правом нижнем углу экрана коричневым цветом сплошной линией увеличенной толщины. В окружности написать «Круг» фиолетовым цветом в горизонтальном направлении буквами увеличенными в 3 раза.
Вариант №10. Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана отсекать). Закрасить окно светло-голубым фоном. Нарисовать окружность в верхнем левом углу экрана радиусом 100 зеленым цветом. Затем заштриховать окружность толстыми коричневыми линиями (///). Затем нарисовать прямоугольник (100х50) примерно в правом нижнем углу экрана желтым цветом линией из точек и тире нормальной толщины. В центре экрана на писать «Привет» малиновым цветом в вертикальном направлении буквами увеличенными в 3 раза.
Вариант №11.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно светло-серым фоном. Нарисовать эллипс в верхнем левом углу экрана с полуосями 80 и 60 красным цветом. Затем заштриховать эллипс зелеными точками (…). Затем нарисовать прямоугольник (120х80) примерно в правом нижнем углу экрана синим цветом пунктирной линией увеличенной толщины. В прямоугольнике написать «Прямоугольник» фиолетовым цветом в горизонтальном направлении буквами обычной высоты.
Вариант №12.
Инициализировать графический режим. Организовать окно в рамках всего экрана (изображение, выходящее за рамки экрана, отсекать). Закрасить окно белым фоном. Нарисовать в верхнем левом углу экрана равнобедренный треугольник линиями зеленого цвета. Затем заштриховать его красными точками (…). Затем нарисовать окружность радиусом 80 примерно в правом нижнем углу экрана синим цветом сплошной линией увеличенной толщины. В окружности написать «Круг» малиновым цветом в горизонтальном направлении буквами увеличенными в 2 раза.