Дано 5 ти значное число вывести на экран монитора вторую и пятую цифры их разность

DarinaKachilova0910 DarinaKachilova0910    3   11.06.2019 03:00    0

Ответы
Виктория6789045 Виктория6789045  09.07.2020 08:42
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика