Задача 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 арбузов
Вывод: 
не является
Задача 5. Дана  строка символов. Проверить, является ли строка записью числа. Число может быть записано с пробелом, например, 100 000, число может быть дробным, например, 5,2
Примеры
Ввод: 
100010
Вывод:
является
Ввод: 
11,5
Вывод: 
является
является
Ввод: 
27 арбузов
Вывод: 
не является
ДЗ
Задача. Проверить, является ли строка записью числа римскими цифрами.
Ввод: 
XХIV
Вывод: 
является
является
Ввод: 
Лето 2000 года
Вывод: 
не является
Комментариев нет:
Отправить комментарий