Предмет: Информатика,
автор: MK1234
Помогите написать программу на Pascal
Из трехзначного числа X вычли его последнюю цифру. Когда результат разделили на 10, а к частному слева приписали последнюю цифру числа X. То получилось число N. По заданному N найти число X (значение N вводится с клавиатуры, 10<=N<=999 , и при этом число десятков в N не равно нулю).
Ответы
Автор ответа:
0
Если было число ABC = X, то после деления на 10 стало AB, а после приписывания слева CAB = N. Для получения из N числа X просто переставляем первую цифру в конец.
var
N: integer;
begin
readln(N);
write(10 * (N mod 100) + (N div 100))
end.
var
N: integer;
begin
readln(N);
write(10 * (N mod 100) + (N div 100))
end.
Похожие вопросы
Предмет: Английский язык,
автор: nikgonharyk
Предмет: Физика,
автор: Аноним
Предмет: Химия,
автор: nagornov2005
Предмет: Литература,
автор: kulbaev2000
Предмет: География,
автор: Аноним