//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var (a,b):=readinteger2('a,b->');
if a.IsEven then Writeln('a+b=',a+b) else
Writeln('a*b=',a*b);
end.
5А в 16= 5*16^1+10*16^0= 90 в десятой степени снизу.
<em>// PascalABC.NET 3.3, сборка 1555 от 21.10.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadlnString.Reverse.Println
end.
<u>Пример</u>
рука
акур