Question

ПАСКАЛЬ! Дано натуральное число n<= 99. Дописать к нему цифру k в конец и начало.

Answer 1

Var
   n,k:integer;
Begin
Write('n = ');
ReadLn(n);
Write('k = ');
ReadLn(k);
if n > 9 then n:=(n+k*100)*10+k
else n:=(n+k*10)*10+k;
WriteLn(n)
End.