<span>Для хранения 3 символов необходима ячейка, объемом </span>24 бит
Наибольшее двузначное число, произведение цифр равно 63
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString.Replace('ма','ко').Println
end.
<u>Пример</u>
Тамара сломала куклу.
Такора слокола куклу.
Var
i, s: integer;
begin
s := 0;
for i := 10 to 99 do
if i mod 2 = 0 then
s := s + i;
writeln(s);
end.