Решите задачу ** языке Pascal. Дано двухзначное число. Найти сумму и произведение его...

Question

Решите задачу на языке Pascal.
Дано двухзначное число. Найти сумму и произведение его цифр.

Answer 1

Var
a,b,c,sum,pr:longint
begin
read(a);
b:=a div 10;
c:=a mod 10;
sum:=b+c;
pr:=b*c;
write(sum,' ',pr);
end.

Comments

ну как, помог?

---

Да))) Спасибо