Технический форум - Помогите составить программу в Object Pascal

Технический форум (http://www.tehnari.ru/)

- Delphi, Kylix and Pascal (http://www.tehnari.ru/f43/)

- - Помогите составить программу в Object Pascal (http://www.tehnari.ru/f43/t84303/)

Марина Зудова

24.01.2013 16:54

Помогите составить программу в Object Pascal

Нужно составить программу с линейным алгоритмом. Задано вещественное значение аргумента х. Вычислите значение функции у.
у=tgx+x^3

Gruvi

24.01.2013 17:50

Цитата:

var
y, x: real;
begin
write('Enter x:');readln(x);
y:= tg(x)+(sqr(x)*x);

writeln('Rezult Y=',y:3:2);
writeln('x=',x);

end.

Могу конечно ошибаться (т.к. пишу в блокноте)

Vladimir_S

24.01.2013 19:35

Цитата:

Сообщение от Gruvi (Сообщение 853462)

Могу конечно ошибаться

Есть немного. Тангенса в составе (по крайней мере, "классического") Паскаля нет. Так что надо через Sin(x)/Cos(x).
И потом - немножко смутило упоминание Object Pascal. Может быть, тут надо ради этой ерунды задавать классы, вводить конструкторы/деструкторы и прочие 24 удовольствия?

Gruvi

24.01.2013 21:24

Цитата:

Сообщение от Vladimir_S (Сообщение 853498)

Ты имеешь введу как на delphi примерно написать?

Vladimir_S

25.01.2013 09:38

Цитата:

Сообщение от Gruvi (Сообщение 853559)

Ты имеешь введу как на delphi примерно написать?

Женя, не суть важно, что имею в виду я, тут важно понять, что имеет в виду ТС. Точнее, препод. :D

Часовой пояс GMT +4, время: 19:08.