1дано трехзначное число. найти число, полученное при прочтении его цифр справа налево. паскаль 2 . дано трехзначное число. в нем зачеркнули первую слева цифру и приписали ее в конце. найти полученное число. паскаль

tukva83 tukva83    2   17.05.2019 14:47    4

Ответы
ilslim ilslim  30.09.2020 19:26
1.                                        

program raf105;

var abc,a,b,c: integer;

begin

write('Введите трёхзначное число: ');

readln(abc);

a:= abc div 100;

b:= (abc div 10) mod 10;

c:= abc mod 10;

abc:= c*100 + b*10 + a;

writeln('Число наоборот: ',abc);

end.

2.                                        

program raf105;

var abc,a,b,c: integer;

begin

write('Введите трёхзначное число: ');

readln(abc);

a:= abc div 100;

b:= (abc div 10) mod 10;

c:= abc mod 10;

abc:= b*100 + c*10 + a;

writeln('Первое число переместили в конец: ',abc);

end.

                                         PascalABC 3.4.2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика