Writeln

var a,b : integer ;

begin

write('nhap ho va ten'); readln;

write('nhap nam hien tai'); readln(a);

b:=a-13 ;

write('nam sinh la',b);

readln

end.

một số kiêu cơ bản của ngôn ngữ lập trình là : bảng chữ cái , cú pháp và ngữ nghĩa

cấu trúc chung của chương trình có 2 phần

+ Phần khai báo :

- Khai báo tên chương trình

- khai báo các thư viện

+ Phần thân chương trình

Begin

.....

end.

Tên chương trình là tên do người lập trình tự đặt , theo quy tắc đặt tên mà ngôn ngữ lập trình quy định sẵn

quy tắc đặt tên :

+ tên khôg trùng với từ khóa

+ tên không được bắt đầu là chữ số

+ trong tên không được có dấu cách trắng

thank you so much

Bước 1: nhập các số a₁,a₂,...,a_n

Bước 2: Max ← a₁ và i ← 1

Bước 3: Nếu a_i > Max, gán Max ← a_i

Bước 4: i ← i + 1

Bước 5: nếu i ≤ n, quay lại bước 2

Bước 6: thông báo giá trị Max và kết thúc thuật toán

buocsw 5 sửa lại quay lại bước 3

a) var a,b,S : real ;

begin

write('nhap chieu dai'); readln(a);

write('nhap chieu rong'); readln(b);

S:=a*b ;

write('dien tich la',S);

readln

end.

b) var r,S : real ;

begin

write('nhap ban kinh'); readln(r);

S:=r*r*3.14 ;

write('dien tich la',S);

readln

end.

vao 1 chuong trinh ban oi

thuật toán:

- gán biến max cho 1 giá trị bất kì trong dãy

- dùng vòng lặp quét dãy, nếu gặp giá trị nào lớn hơn thì sẽ gán biến cho giá trị đó, cứ như vậy cho đến hết