Запишите ** языке Паскаль программу, которая для произвольного натурального двузначного...

0 голосов
299 просмотров

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


Информатика (16 баллов) | 299 просмотров
Дан 1 ответ
0 голосов

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
(1.0k баллов)
0

Спасибо большое,очень помогли)

0

А почему делим на 10?где div и mod