Используя операторов div и mod,составить алгоритм нахождения суммы и произведения цифр двузначного числа.
Помогите срочно.

var  N, f, s: byte;begin  write('N = ');  readln(N);  f := N div 10;    s := N mod 10;   writeln('Сумма цифр: ', f+ s);  writeln('Произведение цифр: ', f* s);end.