Дано 5 ти значное число вывести на экран монитора вторую и пятую цифры их разность
Дано 5 ти значное число вывести на экран монитора вторую и пятую цифры их разность
Гость
Ответ(ы) на вопрос:
Гостьvar
a: integer;
b, x: byte;
begin
readln(a);
x := a mod 10;
b := a div 1000 mod 10;
writeln(b, ' - ', x, ' = ', b - x);
end.
Не нашли ответ?
Похожие вопросы