Запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.
Запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.
Ответ(ы) на вопрос:
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.
Не нашли ответ?
Похожие вопросы