Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ЛР.doc
Скачиваний:
1
Добавлен:
01.07.2025
Размер:
288.26 Кб
Скачать

3. Объекты и средства исследования

1. Персональный IBM PC совместимый компьютер;

2. Среда программирования TurboPascal 7.0.

4. Задание на работу

В исходном двумерном массиве определить максимальный, минимальный элементы, их сумму, разность и произведение. Сформировать из них одномерный результирующий массив. Для определения максимального и минимального элементов использовать подпрограммы-функции.

program maxmin;

uses crt;

const N=5;

type a=array[1..N,1..N] of real;

var b:a;

b1:array[1..N] of real;

i,j:integer;

function max1(x:a):real;

var max:real;

begin

max:=x[1,1];

for i:=1 to N do

for j:=1 to N do

if x[i,j] > max then max:=x[i,j];

max1:=max;

end;

function min1(y:a):real;

var min:real;

begin

min:=y[1,1];

for i:=1 to N do

for j:=1 to N do

if y[i,j] < min then min:=y[i,j];

min1:=min;

end;

begin

clrscr;

randomize;

for i:=1 to N do begin

for j:=1 to N do begin

b[i,j]:=0.1*random(10)+random(20);

write(b[i,j]:5:1);

end;

writeln;

end;

b1[1]:=max1(b);

b1[2]:=min1(b);

b1[3]:=b1[1]+b1[2];

b1[4]:=b1[1]-b1[2];

b1[5]:=b1[1]*b1[2];

writeln;writeln;

for i:=1 to 5 do

write(b1[i]:5:1);

readln;

end.

5. Порядок выполнения работы

Перед началом работы следует:

  • Включить компьютер;

  • Войти в локальную сеть со своим зарегистрированным именем и паролем;

1. Запустить среду программирования TurboPascal 7.0. Создать новый файл с расширением pas.

2. Разработать алгоритм программы в соответствии с вариантом задания.

3. По разработанному алгоритму составить программу.

4. Произвести компиляцию программы, а также провести ее отладку при необходимости.

5. Запустить выполнение программы и ознакомиться с результатами работы.

6. Завершить работу программы и закрыть среду программирования TurboPascal 7.0.

6. Содержание отчета

Отчет должен содержать название, цели и задачи лабораторной работы, задание, блок схему алгоритма работы программы в соответствии с ГОСТ 19.003 – 80, листинг программы, результат работы программы и выводы по работе.

7. Контрольные вопросы

1. Что такое подпрограмма-функция?

2. Каков формат объявления подпрограммы-функции?

3. Какова структура подпрограммы-функции?

4. Как осуществляется вызов подпрограммы-функции?

5. Что такое фактические и формальные параметры?

Лабораторная работа №9

«Программирование с использованием подпрограмм.

Подпрограммы-процедуры»

1. Цель и задачи работы

Приобретение навыков алгоритмизации и программирования задач с использованием подпрограмм-процедур, изучение способов передачи параметров и обращения к ним.

2. Основные теоретические положения

Описание подпрограммы-процедуры включает в себя: заголовок, разделы описаний, тело процедуры.

В заголовке процедуры за ключевым словом PROCEDURE указывают имя процедуры и в скобках – список формальных параметров со своими типами.

Различают параметры-значения и параметры-переменные.

Параметры-значения определяют исходные данные для работы процедур. При обращении соответствующий фактический параметр может быть любым выражением, результат вычисления которого принадлежит тому же типу, что и формальный параметр. В простейших случаях в качестве такого выражения используются константы или переменные.

Параметры-переменные определяют выходные данные процедуры (их может быть несколько, в этом основное отличие от подпрограммы-функции). В списке формальных параметров параметры-переменные записываются после ключевого слова var.

Обращение к подпрограмме-процедуре осуществляется оператором процедуры, в котором записывается имя процедуры и в скобках – фактические параметры.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]