Question

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

Answer 1

Var
      a:integer;
Begin
  read(a);
   write('Сумма цифр: ',(a mod 10) + (a div 10));
   writeln(', произведение цифр: ',(a mod 10) * (a div 10));
   write(a mod 10, a div 10);
End.

Answer 2

тут и под буквой а и б вместе. write(a mod 10, a div 10); это под буквой Б, остальной код это для буквы а