Những bệnh kh�ng được uống nh�n s�m

[accap]

Hệ thống quảng cáo SangNhuong.com

Các bạn download ở đây nhé

==>Download
:42:

[hoangphuc174]

Hệ thống quảng cáo SangNhuong.com

Ặc. Bắt đầu ngôn ngữ Pascal đọc sách Quách Tuấn Ngọc là dễ hiểu nhất.

[jmcvietnam]

Vậy bạn cho link down và hướng dẫn mọi người xem nào

[cuahangso5]

Hệ thống quảng cáo SangNhuong.com

Em nói đọc sách của Quách Tuấn Ngọc. CHứ E-Book thì hình như chưa có.

[quan_huynh74]

Để em nói sơ lược nha.
Bài đầu tiên em học và cảm thấy dễ hiểu nhất khi tiếp xúc với lập trình là:

Tính tổng
S=1+2+3+4+....+n
Thì thuật toán đưa ra ở đây là
S=0;
[
s:=s+i;
i:=i+1]
Như thế cái s cũ sẽ được thay thế bằng chính nó cộng thêm i.

Nội dung bài toán:
Program Baitoan;
Var
n,i,s:integer;
Begin
Writeln('Nhap:'); { Hiện từ Nhap ra màn hình}
readln(n); { Đọc vào cho biến n}
s:=0; {Khởi tạo giá trị đầu}
For i:=1 to n do {i sẽ chạy từ 1 đến n}
S:=s+i;
Readln;
End.

[dangquang1]

Hệ thống quảng cáo SangNhuong.com

Giống mấy cái vòng lặp For ,while của C và VB ghớm
Thank man

[phamfood]

Mục này không ai vào đọc chán quá.
Phương pháp giao hoán:
a=8;
b=5;
Ta muốn đổi 2 số a & b cho nhau ta có thể dùng thêm biến phụ hoặc không cần:
1) Có sử dụng biến phụ:
tam:=a;
a:=n;
b:=tam;
2) không sử dụng biến phụ:
a:=a+b;
b:=a-b;
a:=a-b;

bạn có thể thử với 2 số bất kì để xem thuật toán