Var
n, sum :integer;
begin
readln(n);
sum:= (n div 10) + (n mod 10);
write(sum,' - ');
if sum mod 2 = 0 then
write('четная')
else
write('нечетная');
end.
<span>ответ будет МТООКП.
используется при кодировании сначало третья буква М, потом последняя Т, затем предпоследняя О и так далее посмотрите по слову работа</span><span>
</span>
Каждую переменную обозначим отдельной буквой.
12022, 1222, 989, 90899, 9000