Задание:
Вариант 8 Дано трехзначное натуральное число. Получить другое натуральное число, в котором порядок цифр изменен на противоположный. Какбудет выглядеть эта программа на языке паскаль?
Решение:
Program swapvar a,b,c,n,m: integer; beginreadln (n); a: =n mod 10; m: =n-a; n: =m/10; b: =n mod 10; m: =n-b; c: =m/10; m: =a*100+b*10+c; writeln ('Ответ: ', n); readln; end
Знаете другой ответ?