Запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.
Запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.
Гость
Ответ(ы) на вопрос:
ГостьProgram Zadacha;
var
a, b: Integer;
Begin
Write('Enter number ');
ReadLn(a);
b := (a mod 10)*10;
b := b + (a div 10);
WriteLn(b);
ReadLn;
End.
ГостьProgram Cislo;
Var
a, b: Integer;
Begin
Write('Enter number ');
Readln(a);
b := (a mod 10)*10;
b := b + (a div 10);
Writeln(b);
Readln; End;
End.
Не нашли ответ?
Похожие вопросы