1. Viết chương trình tìm giá trị nhỏ nhất trong 4 số a, b, c, d [a, b, c, được nhập từ bàn phím].
2. Viết chương trình tìm giá trị lớn nhất trong 4 số a, b, c, d [a, b, c, được nhập từ bàn phím].
3. Viết chương trình tìm giá trị lớn nhất, nhỏ nhất trong 4 số a, b, c, d.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
ProgramMax_Min; Usescrt; Vara,b,c,d:integer; max,min:integer; Begin clrscr; write['nhap so thu nhat :']; readln[a]; max:=a; min:=a; write['nhap so thu hai :']; readln[b]; ifmax<b>b thenmin:=b; write['nhap so thu ba :']; readln[c]; ifmaxc thenmin:=c; write['nhap so thu tu :']; readln[d]; ifmaxd thenmin:=d; writeln['So lon nhat la :',max]; writeln['So nho nhat la :',min]; readln; End.</b> |
4. Viết chương trình nhập vào một dãy số nguyên có n phần tử. In ra màn hình phần tử nhỏ nhất, phần tử lớn nhất và giá trị trung bình của danh sách ra màn hình
II. Các dạng câu lệnh trong chương trình Pascal
1. Câu lệnh if…then…
Nếu <Điều Kiện> thì <Câu lệnh>
If <Điều kiện> then <Câu lệnh>
Nếu điều kiện true thì biểu thức sẽ được thực hiện, còn nếu điều kiện false thì biểu thức sẽ không được thực hiện.
Câu lệnh if… then…. được dùng trong trường hợp để so sánh các phép toán hoặc các phép toán có điều kiện.
Ví dụ:So sánh hai số a, b
Nếu a>b thì in số a ra màn hình
If a>0 then writeln [‘a la so lon hon’];
2. Câu lệnh for…do…
Câu lệnh for…do…. nghĩa là lặp với số lần biết trước, nếu ta biết được số lần lặp lại của một dãy số, một tổng,… thì ta sẽ sử dụng for…do….
For <biến>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>
Trong đó:
- Biến có kiểu số nguyên integer
- Giá trị cuối phải lớn hơn giá trị đầu và là kiểu số nguyên.
- Câu lệnh có thể là câu lệnh đơn [một lệnh] hay lệnh ghép [nhiều lệnh]
Ví dụ: Tính tổng từ 1 tới 10 bằng Pascal
3. Câu lệnh while…do…
Câu lệnh while… do… nghĩa là lặp với số lần chưa biết trước và phụ thuộc vào một điều kiện cụ thể và chỉ dừng lại khi điều kiện đó sai.
Trong Pascal câu lệnh lặp với số lần chưa biết trước là:
while <điều kiện> do <câu lệnh>;
Ví dụ: Tính S là tổng các số tự nhiên sao cho số S nhỏ nhất để S > 1000
III. Những cấu trúc trong chương trình pascal lớp 11
1. Cấu trúc rẽ nhánh
Cấu trúc rẽ nhánh có dạng:
- Dạng thiếu: If <điều kiện> then <câu lệnh> [đã được học ở lớp 8]
-Dạng đủ If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>
Ở dạng đủ câu lệnh được hiểu như sau: Nếu <điều kiện> đúng thì <câu lệnh 1> được thực hiện, ngược lại thì <câu lệnh 2> được thực hiện.
Ví dụ: Nếu x <= 200 thì số tiền phải trả là x*300 đồng. Nếu không thì số tiền phải trả là x*280 đồng
Đưa vào ngôn ngữ pascal là:
If x<=200 then
Writeln [‘So tien phai tra la ’, x*300, ‘dong’]
else
Writeln [‘So tien phai tra la ’, x*280, ‘dong’];
2. Cấu trúc lặp
Trong cấu trúc lặp có 2 dạng:
-Lặp dạng tiến:
For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
Ví dụ:
For i:=1 to 5 do writeln[‘i= ’,i];
Ta được kết quả như sau:
-Dạng lặp lùi
For <biến đếm> := <giá trị cuối> to <giá trị đầu> do <câu lệnh>;
For i:=10 downto 1 do if sqrt[i]>2 then s:=s+i;
Ta được kết quả như sau:
Các phát biểu sau đây, phát biểu nào là SAI [Tin học - Lớp 8]
1 trả lời
Sơ đồ tư duy gồm các thành phần [Tin học - Lớp 6]
2 trả lời
Nêu các bước tạo một bài trình chiếu [Tin học - Lớp 9]
2 trả lời
Phát biểu nào trong các phát biểu sau là sai? [Tin học - Lớp 6]
1 trả lời
Trình bày các bước để đặt lề và hướng giấy in [Tin học - Lớp 7]
2 trả lời
Các phát biểu sau đây, phát biểu nào là SAI [Tin học - Lớp 8]
1 trả lời
Sơ đồ tư duy gồm các thành phần [Tin học - Lớp 6]
2 trả lời
Nêu các bước tạo một bài trình chiếu [Tin học - Lớp 9]
2 trả lời
Phát biểu nào trong các phát biểu sau là sai? [Tin học - Lớp 6]
1 trả lời
Trình bày các bước để đặt lề và hướng giấy in [Tin học - Lớp 7]
2 trả lời
program tinh_tong;
uses crt;
var a, b, tong: integer;
begin
clrscr;
write['Nhap a: ']; readln[a];
write['Nhap b: ']; readln[b];
tong:=a+b;
write['Tong 2 so nguyen a, b la: ', tong];
readln
end.
18/06/2021 1,524
A. Var a , b, tong : real;
B. Var a, b, tong : integer;
Đáp án chính xác
C. Var a, b, tong : char;
D. Var a, b, tong : string;
Video liên quan
program ct_tinh;
uses crt;
var a,b,c:integer;
x,y:real;
begin
clrscr;
write('nhap so a= ');readln(a);
write('nhap so b= ');readln(b);
write('nhap so c= ');readln(c);
x:=a+b+c;
y:=(a+b)*(a+b)/c;
writeln('x= ',x);
writeln('y= ',y);
readln;
end.
18/06/2021 1,615
A. Var a , b, tong : real;
B. Var a, b, tong : integer;
Đáp án chính xác
C. Var a, b, tong : char;
D. Var a, b, tong : string;
Nhập 2 số nguyên a, b từ bàn phím. Viết chương trình tính tổng 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
A. Var a , b, tong : real;
B. Var a, b, tong : integer;
C. Var a, b, tong : char;
D. Var a, b, tong : string;
Các câu hỏi tương tự
Nhập 2 số nguyên a, b từ bàn phím. Viết chương trình tính tổng 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
[0.5 Points]
A. Var a , b, tong : real;
B. Var a, b, tong : integer;
C. Var a, b, tong : char;
D. Var a, b, tong : string;
Nhập 2 số nguyên a, b từ bàn phím. Viết chương trình tính tích 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
A. Var a, b, tich : integer;
B. Var a , b, tich : real;
C. Var a, b, tich : char;
D. Var a, b, tich : string;
Nhập 2 số thực a, b từ bàn phím. Viết chương trình tính tổng 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
A. Var a, b, tong : char;
B. Var a, b, tong : integer;
C. Var a , b, tong : real;
D. Var a, b, tong : string;
Bài 1: Tìm chổ sai trong các lệnh khai báo sau và sửa lại cho đúng A, Var start, begin : real; B, Const x: = 3.14; y:= 1000; C, Var a:=5; D, Const ten lop = ‘8E’; E, Var Xep_loai, diem :Integer, real; F, Var nguyen1, nguyen2 : Integer, thuc1, thuc2: real; G, Const 3ban = ‘Cuong’ , ‘Anh’, ‘Dung’; H, Const ten_nhom = Tin hoc;
Bài 2: Giả sử trong một chương trình Pascal, a và b là hai biến kiểu số nguyên, r là kiểu số thực và s là một biến kiểu xâu. Các phép gán nào sau đây là không hợp lệ A, a : = 120; B, r:=a/b; C, s:=’ truong luu vinh’; D, a:=32.000; E, a:=b mod 3; F, s:=a +b + r; G, a:= 65000; H, a:=a mod b; I, r:= s; J, a:=r; K, r:=a div b; L, a:=a/b;
Bài 3. Viết chương trình tính diện tích tam giác biết chiều cao và cạnh đáy nhập vào từ bàn phím
Bài 4. Viết chương trình nhập vào hai số nguyên a,b và tính trung bình cộng của hai số
Bài 5. Hãy chỉ ra INPUT và OUTPUT của các bài toán sau: a. Xác định số học sinh trong lớp cùng mang họ Trần. b. Tính tổng của các phần tử lớn hơn 0 trong dãy n số cho trước. Bài 6. Giả sử x và y là các biến số. Hãy cho biết kết quả của việc thực hiện thuật toán sau: Bước 1. x x + y Bước 2. y x - y Bước 3. x x – y
Bài 7: Xây dựng thuật toán để giải bài toán: Cho trước ba số dương a, b, c. Hãy cho biết 3 số đó có phải là độ dài ba cạnh của một tam giác hay không? Bài 8. Tìm hiểu ví dụ 6 mục 4 bài 5. Viết lại thuật toán tìm giá trị lớn nhất và nhỏ nhất của dãy số a1,a2,a3…. an cho trước.
giúp mk T_T
Câu sau là cấu trúc gì [Tin học - Lớp 6]
2 trả lời
Phát biểu đó đúng hay sai; tại sao [Tin học - Lớp 7]
2 trả lời
Điền số thích hợp vào chỗ chấm [Tin học - Lớp 7]
2 trả lời
Câu lệnh nào sai [Tin học - Lớp 8]
1 trả lời
Định dạng văn bản là gì [Tin học - Lớp 6]
2 trả lời
Câu sau là cấu trúc gì [Tin học - Lớp 6]
2 trả lời
Phát biểu đó đúng hay sai; tại sao [Tin học - Lớp 7]
2 trả lời
Điền số thích hợp vào chỗ chấm [Tin học - Lớp 7]
2 trả lời
Câu lệnh nào sai [Tin học - Lớp 8]
1 trả lời
Định dạng văn bản là gì [Tin học - Lớp 6]
2 trả lời
VietJack
Bằng cách đăng ký, bạn đồng ý với Điều khoản sử dụng và Chính sách Bảo mật của chúng tôi.