Вопрос по информатике:
1. Разработать подпрограмму для вычисления значения функции (функция определена в таблице 1). Значение функции вычислять с точностью до тысячных долей.
Рассмотреть два варианта реализации подпрограммы: подпрограмма-процедура и подпрограмма-функция.
Использовать подпрограмму для построения таблицы значений функции в 10 различных точках.
- 10.10.2017 15:30
- Информатика
- remove_red_eye 18014
- thumb_up 50
Ответы и объяснения 1
begin
if x=1 then Fx:=1e18 { вместо бесконечности }
else if x<0 then Fx:=exp(-x)
else if x<=4.5 then Fx:=1-ln(abs(1-x*x))
else Fx:=2*x
end;
procedure Px(x:real; var y:real);
begin
if x=1 then y:=1e18 { вместо бесконечности }
else if x<0 then y:=exp(-x)
else if x<=4.5 then y:=1-ln(abs(1-x*x))
else y:=2*x
end;
var
x,y:real;
i:integer;
begin
for i:=-4 to 9 do
begin
x:=i;
Px(x,y);
Writeln(x:2,Fx(x):25:3,y:25:3)
end
end.
- 11.10.2017 07:36
- thumb_up 42
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.