Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

var n,k: integer;
begin
readln(n);
 k:= n mod 10;
 n:= n div 10; 
writeln(Сумма: ,k+n);
 writeln(Произведение: ,k*n);
 write(перестановка: ,k,n) 
 end.

Pascal ABC.NET
Версия 3.0 сборка 1064