Разработать программу табулирования функции

@Ann124 · Регистрация: 04.10.2018

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

Разработать программу табулирования функции q=max(x+y+z,x*y*z)/min(x+y+z,x*y*z)

@Puporev · 05.10.2018, 15:47

По какой(каким) переменным табулировать, на каком(каких) интервалах, с каким(какими) шагом?

@Ann124 · 05.10.2018, 16:03 **[ТС]**

Исходные данные x,y,z. Все остальное произволно

@Puporev · 05.10.2018, 16:30

Ну тогда Бог Вам в помощь.

@Ann124 · 05.10.2018, 16:45 **[ТС]**

шаг1. Промежуток от [-1:15]

@Puporev · 05.10.2018, 17:28

Многовато итераций будет 16^3=4096

Pascal

uses crt;
function min(a,b:integer):integer;
begin
if a<b then min:=a else min:=b;
end;
function max(a,b:integer):integer;
begin
if a>b then max:=a else max:=b;
end;
var x,y,z,k:integer;
     q:real;
begin
clrscr;
k:=0;
x:=-1;
while x<=15 do
 begin
  y:=-1;
  while y<=15 do
   begin
    z:=-1;
    while z<=15 do
     begin
      if min(x+y+z,x*y*z)=0 then writeln('x=',x:2,' y=',y:2,' z=',z:2,' q не определено, деление на 0')
      else
       begin
        q:=max(x+y+z,x*y*z)/min(x+y+z,x*y*z);
        writeln('x=',x:2,' y=',y:2,' z=',z:2,' q=',q:6:3);
       end;
      k:=k+1;
      if k mod 20=0 then
       begin
        write('Press Enter');
        readln;
       end;
      z:=z+1;
     end;
    y:=y+1;
   end;
  x:=x+1;
 end;
readln
end.

@Ann124 · 05.10.2018, 17:45 **[ТС]**

C++

#include "pch.h"
#include <iostream>
#include<math.h>
using namespace std;
 
double max(double a, double b);
double min(double a, double b);
 
int main()
{
    setlocale(0, "");
    int f;
    double x, y, z, a, b, max, min, q;
    double xn, xk, dx;
    printf("Введите значение xn \n");
    scanf_s("%lf", &xn);
    printf("Введите значение xk \n");
    scanf_s("%lf", &xk);
    printf("Введите значение dx \n");
    scanf_s("%lf", &dx);
    printf("\n  x            y             f");
    printf("Введите значение x \n");
    scanf_s("%lf", &x);
    printf("Введите значение y \n");
    scanf_s("%lf", &y);
    printf("Введите значение z \n");
    scanf_s("%lf", &z);
    a = x + y + z;
    b = x * y*z;
    if (a > b) 
    { 
        max = a; 
        f = 1;
    }
    else
    {
        max = b;
        f = 2;
    }
    if (a < b) 
    { 
        min = a; 
        f = 3;
    }
    else
    {
        min = b;
        f = 4;
    }
    q = max / min;
    printf("\n-5.2%lf %-7.2lf %-d", x, y, f);
    return 0;
}

Только как то странно ответ выводит. Что не так?

@Puporev · 05.10.2018, 18:39

Вообще-то это раздел Турбо Паскаль, заблудился что ли?

@Ann124 0 / 0 / 0 Регистрация: 04.10.2018 Сообщений: 26
		1
	Разработать программу табулирования функции 05.10.2018, 15:18. Показов 874. Ответов 7 Метки нет (Все метки) Разработать программу табулирования функции q=max(x+y+z,xyz)/min(x+y+z,xyz) 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	05.10.2018, 15:47	2
	По какой(каким) переменным табулировать, на каком(каких) интервалах, с каким(какими) шагом? 0

@Ann124 0 / 0 / 0 Регистрация: 04.10.2018 Сообщений: 26
	05.10.2018, 16:03 [ТС]	3
	Исходные данные x,y,z. Все остальное произволно 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	05.10.2018, 16:30	4
	Ну тогда Бог Вам в помощь. 0

@Ann124 0 / 0 / 0 Регистрация: 04.10.2018 Сообщений: 26
	05.10.2018, 16:45 [ТС]	5
	шаг1. Промежуток от [-1:15] 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	05.10.2018, 18:39	8
	Вообще-то это раздел Турбо Паскаль, заблудился что ли? 0

Опции темы