Дано натуральное двухзначное число. Получить трехзначные числа, образованные при помощи цифр данного числа и цифры 0.

Pascal

Var A:

integer;

begin

writeln ('введите двузначное число');

readln (A);

writeln ((A div 10) * 100 + (A mod 10));

writeln (A*10);

writeln ((A mod 10) * 100 + (A div 10));

writeln (((A mod 10) * 10 + (A div 10)) * 10);

end.