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

    Помогите написать программу в Pascal.Задано число,если оно находится в диапазоне [0,10] то данное число возвести в квадрат, если нет, то вычислить квадратный корень из числа
    ​

    • Автор:

      bronson

  • Program zadacha;

    var x:integer;

    begin

     readln(x);

     if (x>=0) and (x<=10) then writeln(x*x)

                                   else writeln(sqrt(x));

    end.

    Объяснение:

    • Отвечал:

      lassiemoex
    • 0

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

Еще 4 ненужных тебе вопроса, но это важно для поиска