"Datormācība. Skaitlisko aprēķinu realizācijas metodes ...

end;
begin
write('apaksseejaa robezza a= '); readln(a);
write(' augsseejaa robezza b= '); readln(b);
write(' precizitaate p= '); readln(p);
n:= 1; s2:= 0;
1: n:= n+1; x:= a;
d:= (b-a)/n;
s1:= 0;
while x < (b+d/2) do
begin
s1:= s1+y(x);
x:= x+d;
end;
s1 := s1*d;
if abs(((s1-s2)*100)/s1) > p then
begin
s2:= s1;
goto 1
end;
write(' laukums s=');
writeln(s1);
write(' dalijumu skaits n= ');
writeln(n);
end.
Pk5-11. Noteikt vienādojuma F(x) = 0 saknes un aprēķināt liknes F(x) un abscisu ass
ierobežoto laukuma daļu gadījumā, ja F(x)=x 2 -4.
1.10. Pielikumi
Paškontroles uzdevumu atbildes.
Pk1-1. Gadījumā, ja d=11 un e=3, iegūstam a) 3.67 b) 3 c) 2.
Pk1-2. a) v= 1.2855146294E+00 b) y izmainas par 5.7500000000E+03
Pk1-3. Uzdevuma atrisināšanai ieteicams izmantot skaitļu dalīšanu mod ar 7 un ar 3.
Pk1-4. Veicot uzdevumu svarīgi atcerēties, ka lenķu vērtības no grādiem jāpārvērš radiānos
un ka trigonometriskās funkcijas tgx Pascal standartfunkciju bibliotēkā nav un
tās aprēķins jāorganizē programmētājam.
Pk1-5. Aprēķinu veikšanai jāizmanto sakarības: rinķa līnijas garums - 2πr, rinķa laukums
- πr 2 , kur r ir rinķa radiuss.
Pk1-6. Diennaktī ir 86400 sekundes. Svarīgi ņemt vērā, ka iegūtais skaitlis pārsniedz
integer tipa skaitļu diapozonu.
Pk1-7. Iegūstam simbolus ♣, ♀ , ▲, ■, ╚.
53