Зададено двузначное число. Найдите разность между количеством десятков и одинок. Нужно...

0 голосов
31 просмотров

Зададено двузначное число. Найдите разность между количеством десятков и одинок. Нужно составить программу в PascalABC.


Информатика (20 баллов) | 31 просмотров
Дан 1 ответ
0 голосов

Var
n:integer;
begin
Read(n);
Writeln(n div 10 - n mod 10)
end.

(840 баллов)