Задать вопрос
13 июня, 22:22

Введите x, вычислите Z если x допустимое значение, если нет то пишем x - имеет недопустимое значение, Z вычисляется Z=sqrt (x+5)

+1
Ответы (1)
  1. 14 июня, 00:20
    0
    Var x, z: real;

    begin

    readln (x) ;

    if x < - 5 then writeln ('x - недопустимое число') ;

    else z : = sqrt (x + 5) ;

    writeln (z) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Введите x, вычислите Z если x допустимое значение, если нет то пишем x - имеет недопустимое значение, Z вычисляется Z=sqrt (x+5) ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Записать в виде обычной математической формулы 1) y:=2*sin (x) * sqrt (x+sqrt (abs (x))) 2) y: = sqrt (sin (x) + sin (sqrt (x))) 3) y: = sqrt (abs (x-1) + sqrt (sin (x))) 4) y: = (5*sin (x) + 4) / 2*15*sin (sqrt (x)) 5) k+15*x / (2*sin (x)) 6) y:=
Ответы (1)
Программа не запускается исправьте программу program lab1; Var x, a, nx:integer; y:real; begin write ('Введите x: ') ; read (x) ; write ('Введите a: ') ; read (a) ; write ('Введите nx: ') ; read (nx) ; If a
Ответы (1)
Помогите составить программы Введите несколько чисел. Найдите произведение чисел меньших 7. Введите несколько чисел. Найдите количество двузначных чисел. Введите несколько чисел.
Ответы (1)
Определите ошибку: Ссылка (Отметьте один правильный вариант ответа.) Вариант 1 нет ошибки Вариант 2 ошибка создания окна: недопустимое значение параметра height Вариант 3 ошибка создания окна: не указана ширина открываемого окна
Ответы (1)
Даны 3 стороны треугольника АВС-напечатать какой имеет вид треугольник. Проверьте где у меня ошибки: var a, b, c:integer; begin write ('введите a=') ; readln (a) write ('введите b=') ; readln (b) write ('введите c=') ;
Ответы (1)