Составить программу для вычисления значений функции для нескольких значений аргумента(ов)

@klahfoat_lsdga · Регистрация: 26.06.2016

Author24 — интернет-сервис помощи студентам

Добрый вечер, помогите пожалуйста с задачей в PascalABC.
1. Составить программу для вычисления значений функции для нескольких значений аргумента(ов).
И если не трудно, можно пожалуйста у действия описать, что значит каждая функция?
Рядом с действием.

@Павел Л · 27.06.2016, 15:01

Функция log_ba не стандартная, потому ее надо определить

Pascal

var
  x, y, z: real;
 
function log(a, b: real): real;
begin
  log := ln(a) / ln(b);
end;
 
begin
  readln(x);
  readln(y);
  z := (2 * tan(x) * sin(y) + 1 / 4 * sqrt(abs(1 - sqr(sin(x)) * sqr(cos(power(y, 3))) * tan(x)))) / (power(1 + sqr(x) / 2, 1 / 3) + log(abs(x), 3) + power(e, abs(cos(y))));
  writeln(z);
end.

все остальные функции подписаны в pascalabc

@Puporev · 27.06.2016, 16:39

Pascal

function z(x,y:real):real;
var a,b,c:real;
begin
a:=2*tan(x)*sin(y);
b:=sqrt(abs(1-sqr(sin(x))*sqr(cos(y*y*y))*tan(x)))/4;
c:=power(1+x*x/2,1/3)+ln(abs(x))/ln(3)+exp(abs(cos(y)));
z:=(a+b)/c;
end;
begin
writeln('x=-30.5   y =5.07   z=',z(-30.5,5.07));
writeln('x=  6.06  y= 0.6607 z=',z(6.06,0.6607));
writeln('x=  0.913 y=-5.8    z=',z(0.913,-5.8));
end.

@klahfoat_lsdga 0 / 0 / 0 Регистрация: 26.06.2016 Сообщений: 4
		1
	Составить программу для вычисления значений функции для нескольких значений аргумента(ов) 26.06.2016, 20:42. Показов 2191. Ответов 2 Метки нет (Все метки) Добрый вечер, помогите пожалуйста с задачей в PascalABC. 1. Составить программу для вычисления значений функции для нескольких значений аргумента(ов). И если не трудно, можно пожалуйста у действия описать, что значит каждая функция? Рядом с действием. Миниатюры 0

	27.06.2016, 16:39

Опции темы

Составить программу для вычисления значений функции для нескольких значений аргумента(ов)

Решение