Очень срочно помогите пожалуйста !!! Спасибо заранее) 1. Вводится трехзначное число. Если...

Question

Очень срочно помогите пожалуйста !!!
Спасибо заранее)

1. Вводится трехзначное число. Если сумма цифр заданного числа – четное число, то посчитать сумму цифр, иначе – произведение цифр.

2. Составьте программу, заменяющую из двух данных чисел большее число удвоенным произведением, а меньшее – полусуммой этих чисел.

Answer 1

1. Read(x); A:=x mod 10; X:=x div 10; B:=x mod 10; X:=x div 10; C:=x; If (a+b+c) mod 2 = 0 then print(a+b+c) Else print(a*b*c)

Comments

можешь на листке написать полную программу?

---

2. Begin

---

read(x);

---

read(y);

---

If x>y then begin

---

x:=2(x*y);

---

теперь нужно, кое-что поменять, а редактировать нельзя( ладно, листочек