Сделайте задания пожалуйста какие сможете !

Question

Сделайте задания пожалуйста какие сможете !

---

Comments

Оба варианта?

---

первый

Answer 1

Program Var_1;
var
x,y : real;
begin
//1
Write('Введите x -> ');
Readln(x);
if (x > 3) then Writeln('y = ', x*x + 5)
  else Writeln('y = ', x - 8);
//2
Writeln('Введите x и y через пробел ');
Readln(x,y);
if (x > 0) then Writeln(x + y)
  else Writeln(x * x);
end.

Comments

это какой номер?

---

Это два номера

---

После //1 _ первый, после //2 - второй