Математическая функция в паскале

@Som_e_day · Регистрация: 15.12.2016

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

Пожалуйста, помогите составить листинг для решения функции в паскале

F(x)=
{-3x+9, если x>3
{x^3/x^3, если x<=3

@Akvalar · 15.12.2016, 14:17

элементарно. Вводите Х с клавиатуры, а далее проверяете юольше 3 или меньше. Если больше решаете по первой формуле, если меньше по второй

@Som_e_day · 15.12.2016, 14:55 **[ТС]**

Pascal

Program mf;
var
x, y, i, a, z, c, k: integer;
  Begin
  Writeln ('Введите значение x');
  Readln (x);
  if (x>3) then
    Begin
    y:=-3*x+9;
    Writeln (y);
    readln;
    end;
  if (x<=3) then
    begin
  write('Введите числа x, a: ');
  readln(x,a);
  k:=1;
  for i:=1 to a do
    k:=k*x;
  writeln(k);
  write('Введите числа x, a: ');
  readln(x,a);
  z:=1;
  for i:=1 to a do
    z:=z*x;
  writeln(z);
  c:= k div z;
  writeln(c);
  end;
end.

Сделал так, но не знаю, как сделать так, чтобы выбирался один из вариантов, по отношению к X

@Akvalar · 16.12.2016, 11:37

что такое а?

@Som_e_day 0 / 0 / 0 Регистрация: 15.12.2016 Сообщений: 2
		1
	Математическая функция в паскале 15.12.2016, 14:15. Показов 1104. Ответов 3 Метки нет (Все метки) Пожалуйста, помогите составить листинг для решения функции в паскале F(x)= {-3x+9, если x>3 {x^3/x^3, если x<=3 Миниатюры 0

@Akvalar 3 / 3 / 0 Регистрация: 02.11.2013 Сообщений: 168
	15.12.2016, 14:17	2
	элементарно. Вводите Х с клавиатуры, а далее проверяете юольше 3 или меньше. Если больше решаете по первой формуле, если меньше по второй 1

@Akvalar 3 / 3 / 0 Регистрация: 02.11.2013 Сообщений: 168
	16.12.2016, 11:37	4
	что такое а? 0

Опции темы