С клавиатуры вводят целое число.Если оно положительное-увеличить его пять раз **...

Question

С клавиатуры вводят целое число.Если оно положительное-увеличить его пять раз на два,иначе вывести сообщения ,что оно не положительное

Comments

Паскаль или Питон? Где программировать ?

Answer 1

Program ez;var x: integer;beginreadln(x);if x>0 thenbeginx:= x*(2*5);writeln(x);endelse writeln('Число отрицательно');end.




Это в Паскале. 

Comments

var x: integer;

---

begin

---

readln(x);

---

if x>0 then

---

begin

---

x:= x*(2*5);

---

writeln(x);

---

end

---

else writeln('Число отрицательно');

---

end.