Информационная модель. Программная модель. Разработка подпрограммы 5. Спецификация. Метод решения. Информационная модель

Информационная модель

Таблица 21.9.Информационная модель

Назначение	Имя	Тип
Индекс символа в строке	i	integer
Счетчик слов	kol	integer

Программная модель

function slovo(s:string;k:integer;var wordpos,wordsize:integer):string;

var kol,i:integer;

begin

kol:=0;

i:=1;

wordsize:=0;

wordpos:=1;

while(kol<>k)and(i<=length(s)) do

begin

if s[i]=' ' then

begin

kol:=kol+1;

if kol<>k then

begin

wordsize:=0;

wordpos:=i+1

end

else wordsize:=wordsize+1;

i:=i+1

end;

if kol=k then

slovo:=copy(s,wordpos,wordsize)

else

begin

slovo:='';

wordpos:=0;

wordsize:=0

end

end;

Разработка подпрограммы 5

Спецификация

1. Назначение: проверка симметричности слова относительно его центра. Результат истина, если слово симметрично, и ложь в противном случае.

2. Имя: simmetr

3. Вид: функция

4. Перечень параметров

Таблица 21.10.Перечень параметров

Статус	Назначение	Имя	Тип	Вид
Вxoд	Исходное слово	s	string	параметр-значение
Возвращаемый результат	Признак симметричности слова (истина – слово симметрично, ложь –несимметрично)	simmetr	boolean	-

5. Заголовок п/п: function simmetr(s:string):boolean;

Метод решения

Результату функции присвоить истина, так как пока не найдены несимметричные буквы

simmetr:=true ;

Перебирать номера букв от единицы до половины строки символов. Если очередная буква левой половины не совпадает с симметрично расположенной буквой в правой половине слова, то результату функции присвоить ложь

Информационная модель

Таблица 21.11.Информационная модель

Назначение	Имя	Тип
Индекс символа в строке	i	integer

⇐ Предыдущая 3 4 5 6 7 8910 11 12 Следующая ⇒