Cấu trúc tổng quát của một chương trình Pascal

Thứ năm - 23/07/2020 11:11
Một chương trình viết bang Pascal nếu đầy đủ thì gồm có các phần sau: Tên chương trình, Chương trình con, thân chương trình chính, kết thúc chương trình.
1. Một chương trình viết bang Pascal nếu đầy đủ thì gồm có các phần sau:
PROGRAM TÊN_CHƯƠNG_TRÌNH (Tiêu đề)
{Phần khai báo dữ liệu}
         LABEL...
         CONST...
         TYPE...
         VAR...
{Phần mô tả chương trình con}
         PROCEDURE...
        FUNCTION...
{Thân chương trình chính}
        BEGIN
{Các lệnh được viết ở đây}
        END
{Kết thúc chương trình}

2. VÍ DỤ
Program PT_bậc_2 ;
Var a, b, c, x1, x2, Delta : Real ;
     Procedure NHAP ;
Begin
        Writeln (Giải phương trình bậc 2 : ax2 + bx + c = 0’);
        Write (nhập a, b, c);
        Readln (a, b, c) ;
End ;
BEGIN
         Nhap ;
         If a = 0 then Writeln (a = 0 - không giải)
         Else {a <>0}
              Begin
                  Delta := sqr(b) - 4*a*c ;
                  If Delta < 0 then Writeln (‘vô nghiệm’)
                  Else
                      if Delta = 0 then
                         Begin
                         x1 := -b/2/a ;
                         Writein ('Nghiệm kép :’ , , x1);
                  end ;
         else {Delta >0}
                 Begin
                     x1 := (-b-sqrt(delta))/2/a ;
                     x2 := -b/a – x1 ;
                    Writeln (‘x1 =’ , x1 , ‘x2 =' , x2);
                  end ;
        end ;
END.

  Ý kiến bạn đọc

THÀNH VIÊN

Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site
Kênh Bóng đá trực tiếp hôm nay miễn phí
Kênh
90Phut TV full HD ⇔ 32win
RR88 ⇔ 79king ⇔ bk8 ⇔ 123b

78win ⇔ SV388 ⇔ cakhiatv ⇔ f168
789f ⇔ Cakhia TV ⇔ rikvip ⇔ 8x bet
kết quả bóng đá ⇔ keonhacai ⇔ okvip
b52club ⇔ Kkwin ⇔ ko66 ⇔ Link MB66
https://88betcom.pro/ ⇔ 8x bet ⇔ 
789BET ⇔ shbet ⇔ 32 win ⇔ Daga
j88 ⇔ 789win link ⇔ hi88 ⇔ b52 club
https://789betcom0.com/ ⇔ https://hi88.baby/
TK88 ⇔ rwin ⇔ luongsontv ⇔ SHBET
QQ88 ⇔ qq88 ⇔ i9 Bet ⇔ go88
88bet ⇔ 78win ⇔ j88 ⇔  ⇔ 32win
Bet88 ⇔ 789Win ⇔ HUBET ⇔ bj88
https://789bett1.blog/ ⇔ bj88 ⇔ uu88
F168 ⇔ bet88 ⇔ QQ88 ⇔ bk8 ⇔ bk8
MB66 ⇔ iwinclub ⇔ MB66 ⇔ net88
 ⇔ soc88 ⇔ https://j88t3.com/
https://hi88.gives/ ⇔ 23win ⇔ 8kbet
789F ⇔ hi88 ⇔ https://fun88.social/
https://qq88z.net/ ⇔ https://hubet3d.com/
https://qq88.fun/ ⇔ f168 ⇔ HUBET
rik vip ⇔ v9 bet ⇔ keo nha cai ⇔ u88
https://bshbet.com/ ⇔ https://uk88.rocks
MM88 ⇔ Vuabet88 ⇔ 88AA ⇔ 98win
https://luongson117.tv ⇔ https://hello8880.net/
u888 ⇔ betvisa ⇔ 789p ⇔ https://king88aff.com
red88.com ⇔ choáng club ⇔ bong 88
https://u888lm.com/ ⇔ sv388 ⇔ 23win
https://ww88.supply ⇔ https://f168.com.co/
sin88.com ⇔ https://789club24.com/
https://33win103.com/ ⇔ https://f168.group/
https://33win102.com/ ⇔ https://abc8255.com/
https://33win100.com/ ⇔ https://hi88.tours/
https://myeat.net/ ⇔ https://hi88.report/
https://58win1.info/ ⇔ https://hi88.garden/
https://new88c.co/ ⇔ https://hello880.net/
https://789club60.com/ ⇔ 789WIN
https://f168.dad/ ⇔  ⇔ f168 ⇔ f168
fun 88 ⇔ https://789club24.com/ ⇔ Kuwin
King 88 ⇔ 8xbet ⇔ 7m ⇔ j88 ⇔ EV88
78 win ⇔ KUBET ⇔ 99OK ⇔ 68WIN
88i ⇔ 8 day ⇔ 33win ⇔ HUBET
https://33win101.com/ ⇔ SHBET ⇔ BJ88
five88.com ⇔ https://shbet.gg/ ⇔ SHBET
https://33winpro.me/ ⇔ https://23win.build
alo789 ⇔ hubet ⇔ UU88
https://23win.men/ ⇔ nhà cái 8Kbet
 ⇔ https://789win.voyage/
https://u888.prof/ ⇔ https://ww88i.club/
https://hi88.voyage/ ⇔ https://bk8co.net/
cakhiatv ⇔ https://23wincom.info
https://hi88o.com/ ⇔ https://f168.law/
https://88bett.vip/ ⇔ https://j88.ventures/
https://rcc.eu.com/ ⇔ https://j88com.limited/
New88 ⇔ https://j88.now/ ⇔ hi88
kubet ⇔ https://luongsontv72.com/
https://qq88.gives/ ⇔ 789BET ⇔ ww88
https://88vvcom.net/ ⇔ 789BET
https://32win.vc/ ⇔ 78win ⇔ vegas79
bong88 ⇔ j88 ⇔ j88 ⇔ sunwin ⇔ sunwin
hitclub ⇔ hitclub ⇔ 888b ⇔ 8 day ⇔ go 88
https://f168.giving/ ⇔ s 666 ⇔ QQ88
hi88 ⇔ 79King ⇔ kubet ⇔ 8kbet
7MCN ⇔ Keonhacai55.ws ⇔ RR88
789win ⇔ https://nhacaiuytin.garden/
https://xx88.ink/ ⇔ https://bk88vn.net/
https://23win.kim/ ⇔ https://69vn.co.in/
tỷ lệ kèo nhà cái hôm nay ⇔ King88 link mới
nhà cái UU88 ⇔ https://qq88.markets/
https://j88ss.com ⇔ https://qq88.studio/
888B ⇔ GK88 ⇔ nổ hũ đổi thưởng
https://mm88.blue/ ⇔ trực tiếp bóng đá
Hay 88 ⇔ https://rr882.net/ ⇔ King88
https://789winlem.com/ ⇔ https://cakhiatv88.net/
https://shbet.is/ ⇔ https://13win.london/
https://789win.fund/ ⇔ https://nhacaiuytinso1.net/
nohu ⇔ https://abcvip.ru.com/ ⇔ RR88
https://king88.international/ ⇔ 33win ⇔ 98WIN
https://qq88.racing/ ⇔ https://j88uk.com
https://hubest.co/ ⇔ https://23winvn.co/
https://muranoglass-shop.cn.com/ ⇔ 
soi kèo nhà cái ⇔ https://king88.giving/
https://bet88.ventures/ ⇔
Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây