Помогите решить задачи PascalABC.​

Question

Помогите решить задачи PascalABC.​

---

Answer 1

1.

var

   a, b : integer;

begin

   write('введите два числа: ');

   readln(a, b);

   if (abs(a) > 10) and (abs(b) > 10) then writeln(a+b) else writeln(a*b);

end.

2... много задач...

Comments

спасибо

---

можете помочь

---

Ingr

---

очень надо прошу

---

Дано пятизначное число меньшее 32000. Найти сумму первых трех цифр и сумму вторых цифр. ( число 12345, 1+2+3 и 3+4+5).