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

@Юля7777777 · Регистрация: 27.12.2018

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

Доброго времени суток! Подскажите пожалуйста ,как составить блок схему алгоритма и программу для вычисления функции по формуле, для произвольных исходных данных. с двойной точностью:

@Puporev · 27.12.2018, 16:48

Юля7777777, А какой у Вас Паскаль? Просто в АВС и АВС.net тип real=double, в других нет.

Добавлено через 4 минуты
Да и функции степени и тангенс не везде есть.

@Юля7777777 · 27.12.2018, 16:54 **[ТС]**

Честно говоря, я совсем ничего не понимаю ,но в примере был указан Турбо Паскаль.

@Puporev · 27.12.2018, 16:56

Ну а в каком Паскале Вы будете писать и сдавать? Напишу я в Турбо а оно у Вас не запустится.

@Юля7777777 · 27.12.2018, 17:00 **[ТС]**

Сдавать буду простым написанием сообщения, не на компьютере. То есть,по факту,простым копированием в определенное поле.

@Puporev · 27.12.2018, 17:17

Понятно, пишем для Турбо Паскаля, хотя это и глупо в нынешнее время.

Добавлено через 15 минут

Pascal

var x,a,b,s,t1,t2,t3,t4:double;
begin
writeln('Введите значения x,a,b');
readln(x,a,b);
t1:=b*sqr(cos(x));
t2:=sin(x*x*x*2*pi*b)/cos(x*x*x*2*pi*b);
if t2=0 then write('Значение S не определено')
else
 begin
  if t2>0 then t2:=exp(ln(t2)/3)
  else t2:=-exp(ln(-t2)/3);
  t3:=exp(a+2*x)/exp(ln(0.153)*b);
  if t3=0 then write('Значение S не определено')
  else
   begin
    t3:=ln(abs(t3));
    t4:=exp(sqrt(abs(2*pi*x*x-b*b*b)));
    s:=t1/t2+t3/t4+exp(ln(1.23)*33);
    write('S=',s:0:3);
   end;
 end;
readln
end.

@Юля7777777 · 27.12.2018, 17:27 **[ТС]**

Спасибо большущее))))))))

@Puporev · 27.12.2018, 20:04

Да еще блок-схема.

@Юля7777777 · 28.12.2018, 13:13 **[ТС]**

спасибо))

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

Решение

Решение

@Юля7777777 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 9
		1
	Составить блок-схему алгоритма и программу для вычисления функции по формуле 27.12.2018, 16:28. Показов 16413. Ответов 8 Метки нет (Все метки) Доброго времени суток! Подскажите пожалуйста ,как составить блок схему алгоритма и программу для вычисления функции по формуле, для произвольных исходных данных. с двойной точностью: Миниатюры 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	27.12.2018, 16:48	2
	Юля7777777, А какой у Вас Паскаль? Просто в АВС и АВС.net тип real=double, в других нет. Добавлено через 4 минуты Да и функции степени и тангенс не везде есть. 0

@Юля7777777 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 9
	27.12.2018, 16:54 [ТС]	3
	Честно говоря, я совсем ничего не понимаю ,но в примере был указан Турбо Паскаль. 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	27.12.2018, 16:56	4
	Ну а в каком Паскале Вы будете писать и сдавать? Напишу я в Турбо а оно у Вас не запустится. 0

@Юля7777777 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 9
	27.12.2018, 17:00 [ТС]	5
	Сдавать буду простым написанием сообщения, не на компьютере. То есть,по факту,простым копированием в определенное поле. 0

@Юля7777777 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 9
	27.12.2018, 17:27 [ТС]	7
	Спасибо большущее)))))))) 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	27.12.2018, 20:04	8
	Сообщение было отмечено Юля7777777 как решение Решение Да еще блок-схема. Миниатюры 1

@Юля7777777 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 9
	28.12.2018, 13:13 [ТС]	9
	спасибо)) 0