Запиши программу на языке Паскаль для:
y = {0, если x ≤ 0
{x, если 0 < x ≤ 1
{x², если x > 1
(y:3:0)
Запусти программу и введи значение x = 13

Question

Информатика: Запиши программу на языке Паскаль для: y = {0, если x ≤ 0 {x, если 0 x ≤ 1 {x², если x 1 (y:3:0) Запусти программу и введи значение x = 13

Ksu2k17 · Answer

program ggvfgg; var x, y: real; bool: boolean;begin readln(x); begin if x = 0 then y := 0 end ; begin if x 1 then y := x end ; begin if x 1 then y := sqr(x) ; end; writeln(y: 3: 0); end....

Запиши программу на языке Паскаль для: y = {0, если x ≤ 0 {x, если 0 < x ≤ 1 {x², если x > 1 (y:3:0) Запусти программу и введи значение x = 13

Запиши программу на языке Паскаль для:
y = {0, если x ≤ 0
{x, если 0 < x ≤ 1
{x², если x > 1
(y:3:0)
Запусти программу и введи значение x = 13