Вопрос школьника по предмету Информатика
Запишите на языке паскаль программу которая для произвольного натурального трехзначного числа определяет:
а)Сумму и произведения его цифр
б)число, образовано перестановкой цифр исходного числа
Ответ учителя по предмету Информатика
Ответ:
var i: integer;
begin
randomize;
i := 10 + random (90);
writeln (‘число = ‘, i);
writeln;
writeln (‘сумма его цифр = ‘, i mod 10 + i div 10 );
writeln (‘произведение его цифр = ‘, (i mod 10) * (i div 10 ));
write (‘число, образованное перестановкой цифр исходного числа = ‘, (i mod 10) *10 + i div 10);
end.
Похожие вопросы от пользователей
Помогите пожалуйста!
Ответ запишите не в виде дроби, а в виде числа(не смешанного)