Поделитесь своими знаниями, ответьте на вопрос:
1) Вася забыл пароль к Windows XP, но помнил алгоритм его получения из строки подсказки «B265C42GC4»: если все последовательности символов «C4» заменить на «F16», а затем из получившейся строки удалить все трехзначные числа, то полученная последовательность и будет паролем. Определите пароль: нужно написать код на питоне по нахождению числа вот примерно как он должен работать: A 1 5 3 B 4 2 F B 4 -нашли "B4". A 1 5 3 B 5 2 2 F B 5 2 - заменили "B4" на "B52". A 1 5 3 B 5 2 2 F B 5 2 - нашли трехзначные числа. A B F B 5 2 - удалили трехзначные числа. Получили пароль: A B F B 5 2.
var x,y,z,c:integer;
begin
readln (x,y,z);
c:=x;
if c>y then c:=y;
if c>z then c:=z;
writeln (c);
end.
2)Program n_2;
var x,y,z:integer; q,w,e:boolean;
begin
readln (x,y,z);
q:= (y>x) and (z>x);
w:= (y<x) and (y<z);
e:= (z<y) and (z<x);
if e=True then writeln (z);
if w=True then writeln (y);
if q=True then writeln (x);
end.
3)Program n_3;
var x,y,z:integer;
begin
readln (x,y,z);
if (x<y) and (x<z) then writeln (x);
if (y<x) and (y<z) then writeln (y);
if (z<y) and (z<x) then writeln (z);
end.