Question

Дано натуральное трехзначное число a. сформировать число b, такое что: число сотен в нем равнялось бы цифре сотен числа а, увеличенной на цифру единиц числа а, число десятков в b обнулить, а вместо единиц поставить число десятков от числа а. (никакие поясняющие записи в программе делать не нужно! библиотеку conio.h и команду getch() перед отправкой файла необходимо удалить! ) пример входных и выходных данных № теста |входные данные |выходные данные 1 | 473 | 707 ответ: прикрепите файл с программой в формате cpp, pas, cs, fs или java. ваш ответ будет проверен автоматически.

Answer 1

Var
    a: integer;

begin
    readln(a);
    a := 100 * (a mod 10 + a div 100) + a div 10 mod 10;
    writeln(a);
end.