запишите ** языке паскаль программу,которая для произвольного двузначного числа...

0 голосов
60 просмотров

запишите на языке паскаль программу,которая для произвольного двузначного числа определяет число,образованное перестановкой цифр исходного числа.


Информатика (16 баллов) | 60 просмотров
Дано ответов: 2
0 голосов

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.

(333 баллов)
0 голосов

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.

(28 баллов)