Question

Составьте программы на языке Паскаль, используя условный оператор.

Запишитете программу вычисления значения y по формуле:
y={х + 10, если х> 0
{5x, если x<= 0​

Answer 1

Ответ:

var

 x,y: real;

 

 begin

   Readln(x);

   if x > 0 then y := x + 10;

   if x <= 0 then y := 5 * x;  

   Write('y = ', y);

 end.

Объяснение: