Помогите с заданием по информатике, пожалуйста (15 баллов): Запишите ** языке Паскаль...

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

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


Информатика (4.6k баллов) | 49 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var a,a1,a2,b:integer;
begin
write('a = ');
readln(a);
a1:=a div 10;
a2:=a mod 10;
writeln('Сумма цифр = ',a1+a2);
writeln('Произведение цифр = ',a1*a2);
writeln('Число наоборот: ',a2*10+a1);
end.

Пример:
a = 25
Сумма цифр = 7
Произведение цифр = 10
Число наоборот: 52

(194k баллов)
0

Я так понимаю, что ВЫ два в одном решили?

0

Правильно понимаете.

0

Кстати, я отметила нечайно ошибку в решении можете забанить меня в ответ, извините