Всем сюда !!! - Помощь студентам

Сергей004 · 25.12.2012, 17:48

Народ добрый прошу вас сделать мне 2 задачи они лёгкие но я что то в них запутался

Smitt&Wesson · 25.12.2012, 17:49

Все отсюда!

Сергей004 · 25.12.2012, 17:51

Шутник??!!!!!!!!

kventin_zhuk · 25.12.2012, 17:54

Ну а вы хотя бы пробовали?( И скучно и грустно.......

Код:

{not compile}
var 
  a, x, y: real;
begin
  write('Enter a');
  readln(a);
  write('Enter x');
  readln(x);
  if x >= 1 then
      y := sin(x + a) / cos(x + a)
  else
      y := sqrt(x + a);
  writeln('Result', y);
end.

BDA · 25.12.2012, 17:58

Кросспостинг запрещен - Ваша тема http://programmersforum.ru/showthread.php?t=223264.

25.12.2012, 17:49	#2
Smitt&Wesson Старожил Регистрация: 31.05.2010 Сообщений: 13,543	Все отсюда! Пиши пьяным, редактируй трезвым. Справочник по алгоритмам С++ Builder

25.12.2012, 17:54	#4
kventin_zhuk БНТУ ФИТР Форумчанин Регистрация: 20.05.2012 Сообщений: 315	Ну а вы хотя бы пробовали?( И скучно и грустно....... Код: `{not compile} var a, x, y: real; begin write('Enter a'); readln(a); write('Enter x'); readln(x); if x >= 1 then y := sin(x + a) / cos(x + a) else y := sqrt(x + a); writeln('Result', y); end.` С++(console/builder/WinAPI/Linux), C#, Pascal, Delphi, Asm, Prolog. < ----- Контакты kventin_zhuk@live.com

25.12.2012, 17:58	#5
BDA МегаМодератор СуперМодератор Регистрация: 09.11.2010 Сообщений: 7,431	Кросспостинг запрещен - Ваша тема http://programmersforum.ru/showthread.php?t=223264. Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
паскаль матрица всем сюда	Akcentbek	Паскаль, Turbo Pascal, PascalABC.NET	5	04.03.2012 07:20
Всем фантазерам сюда - нужны ИДЕИ.	abzhapparovmaxat	Свободное общение	35	08.11.2011 08:12

25.12.2012, 17:51	#3
Сергей004 Новичок Джуниор Регистрация: 24.12.2012 Сообщений: 12	Шутник??!!!!!!!!