Var n,k,i:integer;
y:longint;
begin
readln(n);
k:=1;
y:=1;
for i:=1 to n+1 do begin
y:=y*k;
k:=k+2;
end;
writeln(y);
end.
S = input("Введите Фамилия, Отчество Имя:\n")
s1 = s[0:s.find(",")]+s[s.rfind(" "):len(s)]+s[s.find(" "):s.rfind(" ")]
print(s1)
Пример:
<span>Введите Фамилия, Отчество Имя:
Иванов, Сидорович Прохор
Иванов Прохор Сидорович</span>
вот так:
1101100 = 108 в десятичной системе
1101100 = 6c в шестнадцатеричной системе
Жёсткий диск, оперативная память, флэш память. и.т.д