1-laboratoriya ishi mavzu: Turli modellar tuzishga doir misollar yechish. Kerakli texnik vositalar

LABORATORIYA MASHG‘ULOTLARI
Kompyuterli modellashtirish


1-LABORATORIYA ISHI


Mavzu: Turli modellar tuzishga doir misollar yechish.
Kerakli texnik vositalar:
Shaxsiy kompyuter.
Kerakli dasturiy vositalar:
Turbo Paskal dasturlash sistemasi va sodda matematik tenglamalar.
Ishning maqsadi: Talabalarga turli modellar tuzish doirasida kavadrat tenglamalarni yechish algoritmlarini berish hamda bu usullarga Paskal tilida tuzilgan dasturda ishlashga o‘rgatish.
Topshiriq

1. 
   Berilgan kvadrat tenglamalarni diskrimantni aniqlash orqali yeching.
   

Nazariy qism

Kvadarat tenglamalarni yechish uchun Paskal algoritmik tilida tuzilgan dastur matni
program nom;
var
a,b,c,x,x1,x2,d:real;
begin
readln(a,b,c);
d:=b*b-4*a*c;
if d>0 then begin
x1:=(-b-sqrt(d))/(2*a);
x2:=(-b+sqrt(d))/(2*a);
writeln('TENGLAMANING BIRINCHI YECHIMI x1=',x1);
writeln('TENGLAMANING BIRINCHI YECHIMI x2=',x2);
end;
if d=0 then
begin
x:=-b/(2*a);
writeln('TENGLAMA BITTA YECHIMGA EGA x=',x)
end;
if d<0 then writeln('Tenglama yechimga ega emas.');
end.


Algoritmi

2-LABORATORIYA ISHI


Mavzu: Xatoliklarning umumiy formulasidan foydalanib xatoliklarni aniqlashda doir masalalar yechish.
Kerakli texnik vositalar:
Shaxsiy kompyuter.
Kerakli dasturiy vositalar:
Turbo Paskal dasturlash sistemasi va argumentlar xatoligi keltirib chiqaradigan differensiallanuvchi funksiyalar to‘plami va yechishga tuzilgan dasturlar.
Ishning maqsadi: Talabalarni taqribiy sonlar bilan ishlashga o‘rgatish,
taqribiy sonning absolyut va nisbiy xatosini baholash, shuningdek, argumentlar
xatoligi keltirib chiqaradigan differensiallanuvchi funksiya, klavishli hisoblash
mashinalari ishlatilishini o‘rgatish.