ПАСКАЛЬ! Дано натуральное число n<= 99. Дописать к нему цифру k в конец и начало.
DARTHVADER1st:
И что должно получиться?
Ответы
Ответ дал:
6
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.
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.
Вас заинтересует
4 месяца назад
4 месяца назад
1 год назад
1 год назад
2 года назад
7 лет назад