Жизненные задачи

ВЫПОЛНЕНИЕ ПРАКТИЧЕСКИХ ЗАДАНИЙ ИЗ РАЗЛИЧНЫХ ПРЕДМЕТНЫХ ОБЛАСТЕЙ С ИСПОЛЬЗОВАНИЕМ СИМВОЛЬНЫХ И СТРОКОВЫХ ПЕРЕМЕННЫХ

ПРОВЕРКА ДЗ

Задача 2. Расстановка длинных тире. Символ — в HTML-документе представляет собой длинное тире, которое при просмотре страницы выглядит гораздо привлекательней обычного "-". Поэтому эстеты Веб-дизайна предпочитают использовать именно его. Дан текст, содержащий последовательности символов "-". Заменить их на последовательность символов "—". Напомним, что перед тире и после тире ставится пробел, отличайте тире от дефиса.

РЕШЕНИЕ ЗАДАЧ

Задача 1. В строке вида логин:пароль@сервер. Заменить каждый символ пароля *.

Ввод:

masha:123456@qwe.biz

Вывод:

masha:******@qwe.biz

РЕШЕНИЕ ЗАДАЧ

Задача 2. Набрать и выполнить программу для решения классной задачи.

Задача 3. Дана строка вида имя пользователя@логин#пароль/ник Замените каждый символ пароля %

Задача 4.

Разберите решение задачи.

Задача. Дана строка вида логин:пароль@сервер. Посчитайте сколько цифр в пароле.

Ввод:

masha:qwe987@qwe

Вывод:

3

var s:string;

     k {кол-во цифр в пароле},

     m {для перебора символов в строке, обозначает номер символа в строке},

     n1 {номер :},

     n2 {номер @}:integer;

begin

  readln(s);

  n1:=pos(‘:’,s); {определяем номер первого двоеточия :}

  n2:=pos(‘@',s); {определяем номер первой собаки}

  k:=0;

  for m:=n1+1 to n2-1 do

                                   if (s[m]>=’0’) and (s[m]<=’9’) then k:=k+1 ; {если символ в пароле цифра, то увеличиваем кол-во на 1}

  writeln(k);

end.

Решите задачу. Дана  строка символов. Проверить, является ли строка записью целого числа. Число вводится без пробелов.

Примеры

Ввод:

100010

Вывод:

является

Ввод:

27 арбузов

Вывод:

не является

Решение задачи

var s:string;

     k {кол-во цифр в пароле},

     m {для перебора символов в строке, обозначает номер символа в строке},

     n1 {номер :},

     n2 {номер @}:integer;

begin

  readln(s);

  k:=0;

  for m:=1 to length(s) do

                                   if (s[m]>=’0’) and (s[m]<=’9’) then k:=k+1 ; {если символ в пароле цифра, то увеличиваем кол-во на 1}

 if k=length(s) then writeln('yavl.') else writeln('ne yavl');

end.

Задача 5. Дана  строка символов. Проверить, является ли строка записью числа.Число может быть записано с пробелом, например, 100 000, число может быть дробным, например, 5,2

Примеры

Ввод:

100010

Вывод:

является

Ввод:

11,5

Вывод:
является

Ввод:

27 арбузов

Вывод:

не является

ДЗ

Задача. Проверить, является ли строка записью числа римскими цифрами.

Ввод:

XХIV

Вывод:
является

Ввод:

Лето 2000 года

Вывод:

не является