Запишите на языке Паскаль программу, которая для произвольного двузначного числа определяет: а)сумму и произведение его цифр; б)число, образованное
5-9 класс
|
перестановкой цифр исходного числа.
var n:integer;
Begin
readln(n);
if (n>9) and (n<100) then
begin
writeln('Сумма = ',((n mod 10)+(n div 10) ),' Произведение = ',((n mod 10)*(n div 10) )); writeln('Если поменять местами цифры, то получится ',n mod 10,n div 10);
end
else
writeln('Error!');
readln
End.
Другие вопросы из категории
такое откладка программы? Что называется тестом?
первая колонка устройство комьпьютера вторая назначение третья примеры
четвертая характеристики
устройства ввода
информации
устройство вывода
устройства хранения
информации
устройства обработки
информации
Читайте также
1. Запишите на языке Паскаль программу, которая для произвольного двузначного числа определяет
сумму и произведение его цифр.
число,образованное перестановкой цифр исходного числа.
цифр;б) число,образованное перестановкой цифр исходного числа. Срочно надо
цифры и выводит новое число на экран.