Паскаль. Необходимо написать программки, помогите пожалуйста1. y=x^2+4(корень завершился) при
Паскаль. Необходимо написать программы, помогите пожалуйста
1. y=x^2+4(корень закончился) при x[-4;4)
2. y=x^2-4(корень завершился) при x[-4;4)
2 ответа
Юрок Пильковский
1.
var x: real;
begin
readln(x);
if (xgt;=-4)and(xlt;4) then writeln('y = ',sqrt(x*x+4))
else writeln('Функция не определена');
end.
Пример:
2
y = 2.828427124746190e+00
2.
var x: real;
begin
readln(x);
if (xgt;=-4)and(xlt;4) then
begin
if x*x-4gt;=0 then writeln('y = ',sqrt(x*x-4))
else writeln('Корень из отрицательного числа');
end
else writeln('Функция не определена');
end.
Пример:
0.5
Корень из отрицательного числа
var x: real;
begin
readln(x);
if (xgt;=-4)and(xlt;4) then writeln('y = ',sqrt(x*x+4))
else writeln('Функция не определена');
end.
Пример:
2
y = 2.828427124746190e+00
2.
var x: real;
begin
readln(x);
if (xgt;=-4)and(xlt;4) then
begin
if x*x-4gt;=0 then writeln('y = ',sqrt(x*x-4))
else writeln('Корень из отрицательного числа');
end
else writeln('Функция не определена');
end.
Пример:
0.5
Корень из отрицательного числа
Варвара Папишина
эти программки не работают
Jana Balnova
ошибка в двух программках - Переменная 'y' нигде не употребляется
Влад Желмаков
Программки рабочие. "Переменная 'y' нигде не употребляется" - это предостережение, а не ошибка.
Кирилл Маличев
Pascal
1) uses crt;
var x, y: Real;
begin
readln(x);
if (x gt;= -4) and (x lt;= 4) then y := sqrt(sqr(x) + 4);
writeln(y);
end.
2) uses crt;
var x, y: Integer;
begin
readln(x);
if (x gt;= -4) and (x lt;= 4) then y := sqrt(sqr(x) - 4);
writeln(y);
end.
1) uses crt;
var x, y: Real;
begin
readln(x);
if (x gt;= -4) and (x lt;= 4) then y := sqrt(sqr(x) + 4);
writeln(y);
end.
2) uses crt;
var x, y: Integer;
begin
readln(x);
if (x gt;= -4) and (x lt;= 4) then y := sqrt(sqr(x) - 4);
writeln(y);
end.
Маша Вотова
эти программы не работают
Валерий Фаттяхетдинов
совершил ошибку, поправил
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Облако тегов