Pascal-da kvadrat tənlik

Salam. Pascal-da kvadrat tənliyin həllini necə yazmaq olar?


Yadda saxlama
Kateqoriya: Sual . , , , , , , . Qısa keçid.

Verilmiş cavablar və yazılan şərhlər (3 cavab var)

(21:14, 13/10/2012 ) #21679
1program Quadratic;
2 
3var
4   A,B,C,D: integer;
5 
6begin
7   write('A = ');
8   readln(A);
9   if (A=0) then
10   begin
11      writeln('Not a quadratic equation.');
12      halt;
13   end;
14   write('B = ');
15   readln(B);
16   write('C = ');
17   readln(C);
18   D := B*B-4*A*C;
19   if (D=0) then
20   begin
21      writeln('x = ',-B/2.0/A);
22      halt;
23   end;
24   if (D>0) then
25   begin
26      writeln('x1 = ',(-B+Sqrt(D))/2.0/A);
27      writeln('x2 = ',(-B-Sqrt(D))/2.0/A);
28   end
29   else
30   begin
31      writeln('x1 = (',-B/2.0/A,',',Sqrt(-D)/2.0/A,')');
32      writeln('x2 = (',-B/2.0/A,',',-Sqrt(-D)/2.0/A,')');
33   end;
34end.
Cavablamaq üçün sağ sütundan hesaba daxil olmaq lazımdır

    (19:36, 14/10/2012 ) #21727

    Sonuncu fraqmentdə xəyali vahidi əlavə etməyi unutmusunuz 🙂
    İcazənizlə bəzi “xırda” dəyişiklik edim:

    1begin
    2      writeln('x1 = ',-B/2.0/A,'+',Sqrt(-D)/2.0/A,'i');
    3      writeln('x2 = ',-B/2.0/A,'-',Sqrt(-D)/2.0/A,'i');
    4end;
    Cavablamaq üçün sağ sütundan hesaba daxil olmaq lazımdır

      (19:42, 14/10/2012 ) #21728

      Feedback üçün təşəkkürlər 🙂

      Cavablamaq üçün sağ sütundan hesaba daxil olmaq lazımdır

Bu suala aid öz sualım var:
Sual verin
Bu suala cavab vermək istəyirəm:
Cavab verin

Cavab verin


Cavab yazmaq üçün lütfən sağ sütundan və ya buradan hesaba daxil olun.

Üzvlər üçün giriş

Qeydiyyat

Elan qutusu

Son cavablar və şərhlər

E. Hacı cavab verdi - Elektron servis xidmətləri (14 gün əvvəl)

cavaninsan cavab verdi - Amerika səhmləri (23 gün əvvəl)

Software Developer cavab verdi - Amerika səhmləri (24 gün əvvəl)

SN cavab verdi - Kripto vergi (32 gün əvvəl)

Nicat97 cavab verdi - ilkaddimlar.com-a nə oldu? (39 gün əvvəl)

nicatmemmedli cavab verdi - Proqramlaşdırma - fəlsəfə (43 gün əvvəl)

nicatmemmedli cavab verdi - ilkaddimlar.com-a nə oldu? (43 gün əvvəl)

Software Developer cavab verdi - ilkaddimlar.com-a nə oldu? (53 gün əvvəl)

E. Hacı cavab verdi - Adsense ya görə VÖEN gəlir vergisi 20% istəyirlər (63 gün əvvəl)

Triste cavab verdi - Adsense ya görə VÖEN gəlir vergisi 20% istəyirlər (64 gün əvvəl)

E. Hacı cavab verdi - Adsense ya görə VÖEN gəlir vergisi 20% istəyirlər (64 gün əvvəl)

Triste cavab verdi - Adsense ya görə VÖEN gəlir vergisi 20% istəyirlər (64 gün əvvəl)

E. Hacı cavab verdi - Telefon almışam kamerasında ləkə var qaytarmaq istəyirəm, mağaza qaytarmır (65 gün əvvəl)

Software Developer cavab verdi - Rus dili yatırımı (65 gün əvvəl)

Cənab cavab verdi - Rus dili yatırımı (65 gün əvvəl)

Software Developer - 615 xal

E. Hacı - 608 xal

Onar Alili - 526 xal

Dilsuz - 448 xal

Cabbarov Sübhan - 434 xal

Maqa - 346 xal

Ruslan Butdayev - 328 xal

Namiq Bəndəli - 297 xal

U.Tarlan - 244 xal

Meherremoff - 234 xal

Sistemə daxil olmuş 23311 sualdan 92%-dən çoxu cavablandırılmışdır.

Proyekt haqqında

E-Haci.net istehsalı. © 2010-2025