Microsoft Word Лаб практ инф

Лабораторная работа №
 4 
Программирование алгоритмов циклической структуры
 
Цель 
работы:
 
Разработка 
программ, 
реализующих 
циклические 
алгоритмы арифметического и итерационного типов. 
Алгоритм циклического вычислительного процесса включает в себя 
многократно повторяющиеся участки вычислений для различных значений 
данных. Циклические алгоритмы по способу организации выхода из цикла 
делятся на арифметические и итерационные. Количество повторений в первых 
заранее известно или легко может быть вычислено. Количество повторений во 
вторых заранее неизвестно. Выход из них осуществляется обычно по 

---

82
достижении заданной точности при последовательном приближении к 
искомому значению. 
Задание № 
1. Построить алгоритм определения максимального элемента и 
его номера, случайным образом сформированного одномерного массива, 
состоящего из 25-ти целых двухзначных чисел. Разработать, набрать и отладить 
программу, реализующую этот алгоритм. 
Методика выполнения работы
 
 
1. Алгоритм в виде блок-схемы: 
Рис. 5.7. Блок-схема алгоритма поиска максимального элемента одномерного 
массива и его номера в массиве 
2. Программа на основе алгоритма рис.5.7: 
Program Maximum; 
Uses crt; 
Const n=25; 
Var i,k,max:Integer; 
x:Array[1..n] Of Integer; {Объявление одномерного массива} 
Begin 
Clrscr; 
Randomize; {Формирование новых данных при очередном запуске 
программы} 
Writeln(‘Исходный массив’); 
For i:=1 To n Do {Начало циклического алгоритма арифметического 
типа}