Запишите на языке паскаль программу которая для произвольного натурального двузначного числа определяет a) сумму и произведение его цифр б) число,образованное перестановкой цифр исходного числа

Предыдущий
вопрос Следующий
вопрос

program TwoDigitNumber;

var
num, tens, ones, sum, prod, newNum: integer;
begin
writeln('Enter a two-digit number: ');
readln(num);

tens := num div 10;
ones := num mod 10;

sum := tens + ones;
prod := tens ones;
newNum := ones 10 + tens;

writeln('Sum of digits: ', sum);
writeln('Product of digits: ', prod);
writeln('Number formed by permutation: ', newNum);
end.