Лабораторная работа №14 Линейная комбинация векторов
Лабораторная работа №14 Линейная комбинация векторов - раздел Программирование, Лабораторный практикум по языку программирования Pascal Цель Работы: Овладеть Навыками Составления Алгоритмов Решения Геометрических ...
Цель работы: Овладеть навыками составления алгоритмов решения геометрических задач по теме "Линейные операции над векторами", используя заданный набор процедур.
Файл LIST.1 содержит заголовок программы, функции det2, det3 и следующие процедуры: input, output, sum, subtract, multiply, system2, system3.
Порядок решения задачи
1. Внимательно проанализируйте условие задачи и определите, какими процедурами и функциями из файла LIST.1 Вы воспользуетесь для данной задачи.
2. Допишите основную программу.
3. Исполните программу. Проанализируйте ответ, результат покажите преподавателю.
Пример решения задачи
Задача : Найти сумму k векторов размерности n.
Анализ : для решения данной задачи воспользуемся процедурами input,output,sum.
Основная программа имеет вид :
begin
write('Введите размерность вектора ');
readln(n); write('Введите число векторов ');readln(k);
{------ Первоначальное обнуление вектора суммы b --------}
for i:=1 to n do s[i]:=0;
{--- Ввод координат очередного вектора и добавление его к вектору суммы ---}
Дополнительные задачи.
1. Даны два натуральных числа M и N, M < N. Определить длину периода десятичной дроби M/N и период данной десятичной дроби M/N. (1 балл).
2. Напечатать в порядке возрас
Дополнительные задачи.
1. На двух прозрачных листах бумаги в клетку размерами 20х20 нарисовано по одной фигуре, состоящей из закрашенных клеток. Составьте программу, которая отвечает на вопрос: конгруентны ли эти фигуры?
Дополнительные залания
1. Бинарный поиск (1 балл)
Составить и опробовать работу процедуры, которая определяет, есть ли в данном упорядоченном по возрастанию файле вещественных (целых) чисел данн
Величина. Команды присваивания, ветвления и выбора.
1. Что называется алфавитом языка?
2. Дайте определения величины, выражения, оператора языка программирования.
3. Опишите общую структуру программы на языке Паскаль. Как называютс
Массивы
1. Дайте определение массива.
2. Перечислите три основные свойства табличных величин (массивов).
3. Как описываются массивы на языке Паскаль?
4. Может ли массив содержать
Литерные переменные
1. Дайте определение литерной величины.
2. Как описываются литерные переменные на языке Turbopascal?
3. Объясните, какие значения могут принимать строковые величины А, В, С (что о
Процедуры и функции
1. В каком месте программы и в каком порядке располагаются функции и процедуры? Сравните с алгоритмическим языком.
2. Что такое локальные и глобальные переменные и как они различаются на я
Графика
1. Объясните, для чего предназначен модуль GRAPH. Каким образом он подключается к работе, как совместить его работу с модулем CRT?
2. Как инициализируется и выключается графический режим?
Датчик случайных величин
1. Как вы понимаете термин «случайная величина»?
2. Что такое, по-вашему, равномерно распределенная случайная величина?
3. По какому принципу устроен датчик случайных чисел в язык
Множества
1. Какого типа может быть множество?
2. Как ввести множество с клавиатуры?
3. Как выводить множество на экран?
4. Выполните операции:
(1) ['C','l','M','N'] * ['C
Динамическая память
1. Какие виды внешней памяти для персонального компьютера Вы знаете?
2. Какие виды внутренней памяти персонального компьютера Вы знаете?
3. Как распределяется оперативная память п
Деревья
1) Какую структуру называют деревом?
2) Приведите примеры деревьев.
3) Назовите различные способы графического представления древовидной структуры.
4) Как с помощью масси
Файл PRIMER1.pas
program upr1;
uses crt;
var f,i,o:string[15]; v,g,year:integer;
begin
clrscr;
write('Введите номер текущего года ');readln(year);
write('Введит
Файл lab10.pas
program str_lab;
uses crt;
type str=string[50];
mass=array[1..20] of str;
var s,s1,s2,s3:str;
i,j,k,l,n,t:integer;
x:mass;
{----------------------------------------}
Файл lab11.pas
program matrix_lab;
uses crt;
type st=array[1..20] of real;
matr=array[1..20] of st;
var n, m, j, i, k, l, r: integer; s,s1,s2,s3,ext:real; x,y:st; a:matr;
{---------------
Файл List1.pas
program upr1;
type vector = array[1..20] of real;
var m,g,s,f,a,b,c,d,p,q:vector;i,j,k,n:integer;l,w,v,x,y,z:real;
function det2(a,b,c,d:real):real;
Файл List2.pas
program upr1;
type vector = array[1..20] of real;
var a,b,c,d,p,q,m,g,f,h:vector;i,j,k,n:integer;s,l,u,w,v,x,y,z:real;
function det2(a,b,c,d:real):real;
Файл LAB5.pas
program upr; uses crt;
{-----------------описание типов-----------------------}
type st=string[20]; str=string[8];
ocenka=record ekz:array[1..6] of integer; zach1,zach2:s
Файл LAB6.pas
program upr; uses crt;
{-----------------описание типов-----------------------}
type st=string[20];
data=record
day:1..31; month:st; year:integer; end;
Хотите получать на электронную почту самые свежие новости?
Подпишитесь на Нашу рассылку
Наша политика приватности обеспечивает 100% безопасность и анонимность Ваших E-Mail
Новости и инфо для студентов