Вычисление значений по формуле

@Eizio135 · Регистрация: 08.09.2019

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

Используя математическую модель, разработать блок-схему
алгоритма и на его основе составить программу для вычисления значений,
указанных по варианту. Предусмотреть проверку области допустимых
значений. В случае неопределенности результата программа должна выдать
соответствующее сообщение об ошибке.

Прошу помощь. Заранее благадарю.

@Puporev · 16.10.2019, 07:48

16.

Pascal

var a,b,c,x,y,z:real;
    k:integer;
begin
writeln('Введите значения a,b,c,x');
readln(a,b,c,x);
k:=0;
if x<=a then
 begin
  if x-c<=0 then k:=1
  else y:=ln(x-c);
 end
else
 begin
  if x<b then y:=x+c
  else
   begin
    if c=0 then k:=1
    else y:=x/c;
   end;
  end;
if k=1 then write('Значение Y не определено')
else
 begin
  writeln('Y=',y:0:3);
  z:=y*y-sin(y);
  if z<0 then write('Значение Z не определено')
  else
   begin
    z:=sqrt(z);
    write('Z=',z:0:3);
   end;
 end;
end.

@Puporev · 16.10.2019, 08:04

4.

Pascal

var a,x,y,z:real;
begin
writeln('Введите значения a,x');
readln(a,x);
y:=a+x*x*x;
if y=0 then writeln('Значение Y не определено')
else
 begin
  y:=ln(abs(y));
  writeln('Y=',y:0:3);
 end;
if x>a*a then z:=a*a*a*x
else if x=a*a then z:=a*a-cos(a*x)
else z:=sin(a)*cos(a*x);
write('Z=',z:0:3)
end.

Вычисление значений по формуле

Решение

Решение

@Eizio135 2 / 8 / 1 Регистрация: 08.09.2019 Сообщений: 195
		1
	Вычисление значений по формуле 15.10.2019, 23:35. Показов 3243. Ответов 2 Метки нет (Все метки) Используя математическую модель, разработать блок-схему алгоритма и на его основе составить программу для вычисления значений, указанных по варианту. Предусмотреть проверку области допустимых значений. В случае неопределенности результата программа должна выдать соответствующее сообщение об ошибке. Прошу помощь. Заранее благадарю. 0

Опции темы