mnogomams47
?>

Для обработки текстовой информации на компьютере необходимо представить её.. а) в двоичной знаковой системе б) в десятичной знаковой системе в) символами кириллицы г) символами латиницы

Информатика

Ответы

printlublino
А)в двоично знаковой системе
Алиференко_Елена342

uses crt;

const raz=[' ','.',',','?','!'];{/разделители слов, можно добавить}

var s,sl:string;

   i,k:byte;

begin

clrscr;

writeln('Строка:');

readln(s);

writeln('Слово:');

readln(sl);

k:=0;

for i:=1 to length(s) do{идем по строке}

if(s[i]=sl[1])and((s[i-1] in raz)or(i=1)){если символ равен первому символу слова

а перед ним разделитель или начало строки}

and((s[i+length(sl)] in raz)or(i+length(sl)=length(s))){и после слова разделитетль или конец строки}

and(copy(s,i,length(sl))=sl){и все буквы на интервале равны слову}

then k:=k+1;{считаем}

write('Слово ',sl,' встречается ',k,' рз.');

readln

end.

Объяснение:

на каком языке? (В ответе паскаль)

ekvld708

uses crt;

const raz=[' ','.',',','?','!'];{/разделители слов, можно добавить}

var s,sl:string;

   i,k:byte;

begin

clrscr;

writeln('Строка:');

readln(s);

writeln('Слово:');

readln(sl);

k:=0;

for i:=1 to length(s) do{идем по строке}

if(s[i]=sl[1])and((s[i-1] in raz)or(i=1)){если символ равен первому символу слова

а перед ним разделитель или начало строки}

and((s[i+length(sl)] in raz)or(i+length(sl)=length(s))){и после слова разделитетль или конец строки}

and(copy(s,i,length(sl))=sl){и все буквы на интервале равны слову}

then k:=k+1;{считаем}

write('Слово ',sl,' встречается ',k,' рз.');

readln

end.

Объяснение:

на каком языке? (В ответе паскаль)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Для обработки текстовой информации на компьютере необходимо представить её.. а) в двоичной знаковой системе б) в десятичной знаковой системе в) символами кириллицы г) символами латиницы
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Galiaahmatova4447
Татьяна_Вологжин
stertumasova29
Сергеевна
kep92
alina-bas
Илья Владимировна
Алена-Петрова285
moisalexx7
sergeykvik13
latoyan817
Svetlana395
evgeniishulov4696
samofar
iqtoy2010