Question

информатика 8 класс паскаль
написать текст: двузначное положительное целое число, если меньше 20 - находим сумму цифр,иначе ничего с рим не делаем ​

Answer 1

var

n : integer;

begin

readln(n);

if n < 20 then

   writeln(n mod 10 + n div 10);

end.