Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.11.2011, 20:03   #1
Cruzel
Пользователь
 
Регистрация: 05.11.2011
Сообщений: 31
По умолчанию Задача Pascal

Вот есть такая задача:



при x>a выполняется y= (ln в кубе x+ ....)
при x<=a соотвественно 1/x...

Не могу решить, хоть ты тресни(
Cruzel вне форума Ответить с цитированием
Старый 05.11.2011, 20:07   #2
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Цитата:
Не могу решить
Почему? Что не получается?
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 05.11.2011, 20:10   #3
Cruzel
Пользователь
 
Регистрация: 05.11.2011
Сообщений: 31
По умолчанию

Код:
  program Prog1;
  uses crt;
  var y: real;
  x,a,t: integer;
  begin
  writeln('x=');
 readln(x);
  if x>0 then begin
  y:=(ln(x)*ln(x)*ln(x)+sqr(x))/sqrt(x+t);
  a:=0.8;
t:=3.5;
else begin
  y:=(1)/(x+t);
  end;
  writeln('y=',y);
  readkey;

  end.
вот есть... но не работает
Cruzel вне форума Ответить с цитированием
Старый 05.11.2011, 20:18   #4
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

А зачем создавать 2 одинаковые темы?(http://programmersforum.ru/showthread.php?t=172171)

а и t тоже real должны быть. И a:=0.8; t:=3.5; должно быть вначале (перед if), а не там, где оно находится сейчас.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.

Последний раз редактировалось Alex11223; 05.11.2011 в 20:20.
Alex11223 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Pascal задача giv93 Помощь студентам 2 09.10.2011 23:23
Задача (PASCAL) Artur1992 Помощь студентам 0 11.10.2010 22:59
Задача. PASCAL LeNus'Ka Помощь студентам 5 19.12.2009 20:36
Задача (Pascal) Lees27 Помощь студентам 3 21.05.2009 13:17
Задача в Pascal Alen4ik Помощь студентам 4 18.05.2009 19:04