Рассчитать сумму кубов всех положительных значений и их количество для функции y=3*x^2+2coccosx составить программу для табулирования функции на промежутке [0; 4] с шагом h=0,5. в отчет включить тексты программ, реакции эвм.

Uses crt;
type sInfo = record     
surname:string;     
height:integer;
end;
var pInfo:array [1..12] of sInfo;
begin       
pInfo[1].surname := 'Смирнов';
pInfo[1].height := 190;       
pInfo[2].surname := 'Иванов';
pInfo[2].height := 155;       
pInfo[3].surname := 'Николаев';
pInfo[3].height := 150;               
pInfo[4].surname := 'Викторов';
pInfo[4].height := 168;               
// И так далее по примеру выше.       
// Вывод вот так:       
writeln('Фамилия = ', pInfo[1].surname, ' Возраст = ', pInfo[1].height);
end.

 в строчку.

2. Допускается применение круглых скобок



3. Не допускается подряд два знака операций

.

4. Выражения просматривается слева на право, сравниваются две последовательные операции, и выполняется та, чей приоритет выше.



5. Часть выражения заключенная в скобки выполняется в первую очередь (т.е. скобки изменяют приоритет)



 

Запись арифметических выражений в Паскале

Правила записи основных арифметических функций на языке Турбо-Паскаль приведены в таблице 1.

                                                                                          Таблица 1

В математике

В ТР

|x|

abs(x)



sqrt(x)

X2

sqr(x)

ex

exp(x)

sinx

sin(x)

cosx

cos(x)

tgx

sin(x)/ cos(x)

ctgx

cos(x)/ sin(x)

arctgx

arctan(x)

arcsinx

arctan(x/sqrt(1-sqrt(x)))

arccosx

Pi/2-arctan(x/sqrt(1-sqrt(x)))

lnx

ln(x)

lgx

ln(x)/ ln(10)

log2x

ln(x)/ ln(2)

  

 Возведение в вещественную степень выполняется по формуле


 

Примеры записи выражений

1. 

 

y:=(a*2.5*exp(x)+sqrt(abs(x-1))+ln(sqr(x)/2/a)/ln(10)) / 
     ( arctan(x/sqrt(1-sqr(x))+exp(2/3*ln(x)));

2. 

L:=((sqr(x)+sqr(y))<=sqr(R))and(x*y>=0).