Вопрос по информатике:
Паскаль. Нужно написать программы, помогите пожалуйста
1. y=√x^2+4(корень закончился) при x∈[-4;4)
2. y=√x^2-4(корень закончился) при x∈[-4;4)
Пожаловаться
- 10.08.2016 22:52
- Информатика
- remove_red_eye 9355
- thumb_up 19
Ответы и объяснения 2
Pascal
1) uses crt;
var x, y: Real;
begin
readln(x);
if (x >= -4) and (x <= 4) then y := sqrt(sqr(x) + 4);
writeln(y);
end.
2) uses crt;
var x, y: Integer;
begin
readln(x);
if (x >= -4) and (x <= 4) then y := sqrt(sqr(x) - 4);
writeln(y);
end.
1) uses crt;
var x, y: Real;
begin
readln(x);
if (x >= -4) and (x <= 4) then y := sqrt(sqr(x) + 4);
writeln(y);
end.
2) uses crt;
var x, y: Integer;
begin
readln(x);
if (x >= -4) and (x <= 4) then y := sqrt(sqr(x) - 4);
writeln(y);
end.
Пожаловаться
- 11.08.2016 11:41
- thumb_up 37
1.
var x: real;
begin
readln(x);
if (x>=-4)and(x<4) then writeln('y = ',sqrt(x*x+4))
else writeln('Функция не определена');
end.
Пример:
2
y = 2.828427124746190e+00
2.
var x: real;
begin
readln(x);
if (x>=-4)and(x<4) then
begin
if x*x-4>=0 then writeln('y = ',sqrt(x*x-4))
else writeln('Корень из отрицательного числа');
end
else writeln('Функция не определена');
end.
Пример:
0.5
Корень из отрицательного числа
var x: real;
begin
readln(x);
if (x>=-4)and(x<4) then writeln('y = ',sqrt(x*x+4))
else writeln('Функция не определена');
end.
Пример:
2
y = 2.828427124746190e+00
2.
var x: real;
begin
readln(x);
if (x>=-4)and(x<4) then
begin
if x*x-4>=0 then writeln('y = ',sqrt(x*x-4))
else writeln('Корень из отрицательного числа');
end
else writeln('Функция не определена');
end.
Пример:
0.5
Корень из отрицательного числа
Пожаловаться
- 12.08.2016 04:56
- thumb_up 2
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы