Вычисление значения функции

@EviSweet · Регистрация: 14.10.2012

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

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

Комментарий модератора

Если вы прикладываете изображение, делайте пожалуйста это так, чтобы пользователи не свернули себе шею в попытке прочитать.

HighPredator · 14.10.2012, 13:23

Второе:

Pascal

program test;
 
uses
  Crt;
 
const
  a=3.53;
 
var
  x,y:real;
 
begin
  x:=2.35*ln(a);
  if x<0 then y:=(1+exp(x))*ln(x+a)
  else y:=(ln(x+a))/(ln((x*sqrt(a+x))));
  writeln(y:8:4);
  readln;
end.

@EviSweet · 14.10.2012, 13:29 **[ТС]**

Спасибо огромное)

@EviSweet 0 / 0 / 0 Регистрация: 14.10.2012 Сообщений: 4
	14.10.2012, 13:29 [ТС]	3
	Спасибо огромное) 0

Вычисление значения функции

Решение