Реферат: Лабораторная работа №11

Цель работы: Изучение правил и получение навыков составления программ с использованием сложных типов данных массивов.

Задание№ 17. Из символов произвольного предложения сформировать массив целых чисел, соответствующих порядковому номеру литер в коде ASCII. Определить максимальный элемент этого порядка.

Программа на Turbo Pascal

{**********************************************}

{программа: 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,' букв латинского алфавита');

--> ЧИТАТЬ ПОЛНОСТЬЮ <--

К-во Просмотров: 217
Бесплатно скачать Реферат: Лабораторная работа №11