Мета роботи: Вивчення правил та отримання навичок складання програм звикористанням складних типів даних масивів.
Завдання № 17. З символів довільного пропозиції сформувати масивцілих чисел, що відповідають порядковому номеру літер в коді ASCII.
Визначити максимальний елемент цього порядку.

Программа на Turbo Pascal
{**********************************************}< br >(програма: Lab11)
(мета: сформувати масив)
(змінні: xmax-константа)
(stroka-тип символьного масиву)
(codes-тип масиву цілих даних)
(i-мінлива)
(підпрограми: відсутні)
(програмист: студент гр. 316 Позднишев А.А. )
(перевірив: Новачків В.С. )
(дата: 20.04.2004г. )
{**********************************************}program Lab11; uses crt; const xmax = 5; type lettre = char; var stroka: array [1 .. xmax] of lettre; codes: array [1 .. xmax] of byte; i: integer; max: real; begin clrscr; writeln ( 'введіть', xmax, 'букв латинського алфавіту'); for i: = 1 to xmax do read (stroka [i]); for i: = 1 to xmax do writeln (stroka [i]); for i: = 1 to xmax do codes [i]: = ord (stroka [i]); for i: = 1 to xmax do writeln (codes [i]); max: = codes [1]; for i: = 1 to xmax do begin if max

Блок-схема.

-----------------------

codes [i]: = ord (stroka [i])

i = 1 (1) xmax

Max