В трехзначном числе х зачеркнули первую цифру. Когда
полученное число умножили на 10, а произведение сложили с
первой цифрой числа х, то получилось число n. По заданному n
найти число х (значение n вводится с клавиатуры, 1 <= n <=999
ПОМОГИТЕ РЕШИТЬ ЗАДАЧУУУ
Ответы
Ответ дал:
0
//PascalABC.NET 3.2 сборка 1318
Var
n,first,oth:integer;
begin
readln(n);
first:=n mod 10;
oth:=n div 10;
if first<>0 then writeln(first,oth) else writeln('X не трёхзначеное');
end.
Пример ввода:
234
Пример вывода:
423
Var
n,first,oth:integer;
begin
readln(n);
first:=n mod 10;
oth:=n div 10;
if first<>0 then writeln(first,oth) else writeln('X не трёхзначеное');
end.
Пример ввода:
234
Пример вывода:
423
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
9 лет назад