Напишите программу в паскале с div и mod! заранее ! вводится трехзначное целое число. получить новое число, записанное этими же цифрами, но в обратном порядке.

124

164

Посмотреть ответы 3

Ответы на вопрос:

DARINASTAR98

Информатика

4,4(59 оценок)

Var a: integer; begin write('введите трёхзначное число: '); readln(a); writeln(a mod 10,abs((a div 10) mod 10),abs(a div 100)); end. примеры работы программы: введите трёхзначное число: 123 321 введите трёхзначное число: -987 -789

fumymovie

Информатика

4,6(61 оценок)

Var a,a1,a2,a3,b: integer; begin write('a = '); readln(a); a1: =abs(a) div 100; a2: =abs(a) div 10 mod 10; a3: =abs(a) mod 10; b: =sign(a)*(a3*100+a2*10+a1); writeln(b); end. пример: a = -456 -654