begin
var str := ReadString().ToWords;
try
write(str[1].ToInteger * 2);
except
write('Ошибка при вводе.');
end;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
begin
var str := ReadString().ToWords;
try
write(str[1].ToInteger * 2);
except
write('Ошибка при вводе.');
end;
end.