85801

Работа со строками

Лабораторная работа

Информатика, кибернетика и программирование

Цель: Изучение принципов работы с строковыми данными. Закрепление навыков использования управляющих структур программирования, ввода-вывода данных, приемов работы с циклами. Ход Работы: Задание 1. Дан текст, слова в котором разделяются пробелами. Требуется подсчитать количество слов в строке.

Русский

2015-03-30

61.96 KB

0 чел.

Лабораторная работа №5.

Тема: Работа со строками.

Цель: Изучение принципов работы с строковыми данными. Закрепление навыков использования управляющих структур программирования, ввода-вывода данных, приемов работы с циклами.

Ход Работы:

Задание 1. Дан текст, слова в котором разделяются пробелами. Требуется подсчитать количество слов в строке. Количество слов будет равно количеству пробелов.

program c1;

uses crt;

Var s:string;

i:byte;

n,k:integer;

Begin

clrscr;

Writeln('Введите текст');

Read(s);

n:=length(s);

k:=0;

For I:=1 to N do begin

If S[i]=' ' then k:=k+1;

end;

Writeln('кол-во слов в строке=',k);

end.

Задание 2. Вводятся две строки. Из первой строки вырезать первые три символа, из второй строки вырезать три символа. Склеить из них новое слово и вывести его.

Program c2;

uses crt;

var s1,s2,s3,s4,s5:string;

k,i:integer;

begin

clrscr;

begin

writeln('ввести две строки');

Read(s1,s2);

k:=length(s2);

s3:=copy(s1,1,3);

s4:=copy(s2,k-2,3);

s5:=s3+s4;

writeln(' полученное слово ',s5);

end;

end.

Задание 3. Выполнить шифрование введенной строки по следующему алгоритму: каждый символ строки заменить на следующий по номеру символ. Вывести зашифрованную строку.

Задание 4. Написать программу, выполняющую расшифровку строк из предыдущего задания.


 

А также другие работы, которые могут Вас заинтересовать

77660. Нанотехнологии в медицине 990 KB
  Человечество всегда стремилось к прогрессу и с древних времён искало способы лечить болезни и продлевать жизнь. Люди пытались излечивать болезни разными способами - если в XX веке умели решать проблемы на клеточном уровне, то в наше время уже научились решать их на атомном и молекулярном.
77661. История и эволюция инфографики 109 KB
  Выявить значения инфографики как средства совершенствования информации Составить периодизацию истории инфографики Определить особенности и области применения инфографики на различных этапах её развития...
77662. Теория «трех штилей» в учении и поэзии М. В. Ломоносова 134.5 KB
  Актуальность настоящей работы определяется необходимостью проследить «связующую нить» между теоретическими взглядами на стилистическую дифференциацию единиц русского языка М. В. Ломоносова и их практическим воплощением в поэзии автора теории.