«аочное дистанционное образование с получением государственного диплома через Internet










ѕолучить информацию о поступлении
 
√лавна€ Ќовости  арта сайта ‘отоальбом √остева€ книга  онтакты

 

”пражнение 1 (—имвольные переменные и строки)

ƒана строка символов. ”далить из нее первый знак препинани€.

ƒл€ решени€ данной задачи нам понадобитс€ объ€вить множество знаков препинани€ ћ. «атем, последовательно провер€€ каждый символ строки на принадлежность этому множеству, найдем первый знак препинани€. Ќайд€ знак, необходимо досрочно выйти из цикла проверки, например с помощью оператора BREAK.

PROGRAM PRG3_1;

VAR STR : STRING;

L, I, J : INTEGER; M : SET OF CHAR;

BEGIN

WRITELN('BBEƒ»TE “≈ —“');

READLN(STR);

L := LENGTH(STR);

FOR I := 1 TO L DO

IF NOT(STR[l] IN M) THEN

WRITE(STR[I])

ELSE

BREAK;

FOR J := 1+1 TO L DO

WRITE(STR[J]);

WRITELN

END.

ƒл€ решени€ задачи:

- формируем тело программы и описываем переменные;

- задаем значение множества ћ - множества знаков препинани€;

- цикл FOR I := 1 “ќ L DO осуществл€ет вывод строки до первого знака препинани€;

- цикл FOR J := 1+1 “ќ L DO выводит строку после первого знака препинани€;

- после вывода закрываем строку оператором WRITELN.

ѕеременные:

I, J - переменные циклов;

L - длина строки;

STR - строка текста;

ћ - множество знаков препинани€.


”знать как сэкономить в кризис моно на сайте ekonom-it.ru

”пражнение 1 (ќбработка числовых последовательностей) ”пражнение 2 (ќбработка числовых последовательностей) ”пражнение 3 (ќбработка числовых последовательностей) ”пражнение 4 (ќбработка числовых последовательностей) «адачи на тему "—имвольные переменные и строки" ”пражнение 2 (—имвольные переменные и строки) ”пражнение 3 (—имвольные переменные и строки) ”пражнение 4 (—имвольные переменные и строки) «адачи на тему "ќдномерные массивы" ”пражнение 1 (ќдномерные массивы) 


 
     
   
 


ѕриглашаем прин€ть участие в круглом столе!
подробнее   >>>
 

»нститут ћенеджмента, Ёкономики и »нноваций начинает набор на курсы повышени€ квалификации!
подробнее   >>>
 

”важемые студенты јЌќ ¬ѕќ »ћЁи»!
подробнее   >>>
 

Ќачинаетс€ набор на курсы повышени€ квалификации!
подробнее   >>>
 

ѕриглашаем прин€ть участие в конференци€х!
подробнее   >>>
 


все новости...

 


–ассылки Subscribe.Ru
—овременное образование
ѕодписатьс€ письмом