• Вопрос по информатике:

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

    Я не понимаю... Помогите, пожалуйста!

    • Автор:

      deven
  • Вывод:

    36

    Код программы:

    program raf105;

    var

     x,y: real;

    begin

     write('x = ');

     readln(x);

     if x <= 0

       then y:= 0;

     if (0 < x) and (x <= 1)

       then y:= x;

     if x > 1

       then y:= power(x,2);

     writeln('y = ',y:3:0);

    end.

    PascalABC 3.4.2
    • Отвечал:

      khalilwzts

    Ответов нет, но ты это испарвиш!