запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.
запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
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.