Задача 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 года
Вывод:
не является
Комментариев нет:
Отправить комментарий