cho em hỏi là làm sao khi nhìn cái câu hỏi pascal là làm ra chương trình ngay vậy ạ,mong mn chỉ dẫn

0 bình luận về “cho em hỏi là làm sao khi nhìn cái câu hỏi pascal là làm ra chương trình ngay vậy ạ,mong mn chỉ dẫn”

1. Khi đọc câu hỏi cần xác định chương trình khi viết ra phải khai báo bao nhiêu biến, là những biến nào và thuộc kiểu số nào, dùng những câu lệnh gì.

   VD: Viết chương trình tính tổng N số nguyên đầu tiên

          +Biến sẽ có: biến N, biến i (để chạy vòng for), biến T (lưu giá trị tổng)

          +Câu lệnh sẽ dùng trong chương trình: for…to…do

   Chương trình:

   program Tong;

   uses crt;

   var N,i,T: integer;

   Begin

            write(‘Nhap N: ‘); readln(N);

            for i:=1 to N do T:=T+i;

            write(‘T = ‘,T);

            readln

   End.

   Bình luận

2. Các bước đầy đủ nhất là:

   B1. Đọc đề, phân tích xác định bài toán, yêu cầu đề như là (cần khai báo biến gì, kiểu dữ liệu gì, đọc biến ra sao…).

   B2. Xác định thuật toán(có thể gộp với B3 nếu bạn đã thành thạo tức là vừa làm vừa nghĩ thuật toán).

   B3. Viết chương trình theo thuật toán, biến khi nãy ta đã xác định.

   Thông thường kho thành thạo thì bạn chỉ cần nghĩ ttrong đầu và gộp hết vào B3.

   Vd: Viết chương trình tính tích các số nguyên từ  1 đến n, với n nhập từ bàn phím.

   Xác định bài toán, yêu cầu đề: 

   Yêu cầu đề: tính tích các số nguyên từ  1 đến n;

   Input: n;

   Output: tích các số nguyên từ  1 đến n;

   Thuật toán:

   B1. Nhập n;

   B2. i=0; t=1;

   B3. i←i+1; t←t*i;

   B4. Nếu i=n thì xuất t ngược lại sang B3. (ở đây bạn có thể hiểu đây là vòng lặp, va có thể dùng for, while, repeat tùy chọn)

   B5. Kết thúc;

   Chương trình: 

   uses crt;
   var n,t,i:longint;
   begin
   clrscr;
      write(‘n= ‘);readln(n);
      t:=1;
      for i:=1 to n do t:=t*i;
      writeln(t);
   readln
   end.

   Bình luận