Предмет: Информатика,
автор: MrSwister
Запишите на языке паскаль программу, которая для производьного двузначного числа определяет:
1) Сумму и произведение его цифр
2) Число образованное перестановкой чисел исходного числа.
Ответы
Автор ответа:
1
uses crt;
var input,a,b,c:integer;
begin
readln(input);
a:=input div 10;
a:= a mod 10;
b := input mod 10;
writeln('Сумма ', a + b);
writeln('Произведение ', a*b);
writeln('Перестановка ', b * 10 + a);
end.
var input,a,b,c:integer;
begin
readln(input);
a:=input div 10;
a:= a mod 10;
b := input mod 10;
writeln('Сумма ', a + b);
writeln('Произведение ', a*b);
writeln('Перестановка ', b * 10 + a);
end.
Автор ответа:
0
var a,b,c:integer;
begin
write('Введите двузначное число: ');
readln(a);
b := a div 10;
c := a mod 10;
writeln('Сумма: ', b + c);
writeln('Произведение: ', b*c);
writeln('Перестановка: ', c,b);
end.
begin
write('Введите двузначное число: ');
readln(a);
b := a div 10;
c := a mod 10;
writeln('Сумма: ', b + c);
writeln('Произведение: ', b*c);
writeln('Перестановка: ', c,b);
end.
Интересные вопросы
Предмет: Другие предметы,
автор: madiarkarakat4
Предмет: Математика,
автор: ghoulkken2
Предмет: Геометрия,
автор: loxy77
Предмет: Литература,
автор: keut77
Предмет: Математика,
автор: ИркаЧерноморцева