Примеры выражений на языке Pascal

X:=A*(b-sqrt(A-power(b,5)));

Y:=(sin(c*X/2)+exp(x))/(1+power(x,1/3));

Z:=Ln(1+sin(X)*sin(X));

Проверка X≠0:

1. if (abs(X)>1E-10) then… //, если X –real(дробное)

2. if (X >0) then… //, если X –integer;


Пример реализации разветвления на языке Pascal

Полная конструкция оператора if

2. Неполная конструкция оператора if -отсутствует else -«пустая»ветка (-)

If (Y>0) then begin K:=K+1; S:=S+Y; end;


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: