cách copy chương trình từ pascal sang word
Câu 2. Chương trình dịch trong ngôn ngữ lập trình Pascal là chương trình dùng để làm gì?
A. Dịch ngôn ngữ máy sang ngôn ngữ lập trình
B. Dịch ngôn ngữ lập trình sang ngôn ngữ máy
C. Dịch từ ngôn ngữ tự nhiên sang ngôn ngữ lập trình
D. Dịch từ tiếng Anh sang tiếng Việt
Câu 3. Ngôn ngữ máy tính là ngôn ngữ như thế nào?
A. Là một dãy bit gồm 2 số 0 và 1
B. Là một dãy bít gồm 2 số 1 và 2
C. Là một dãy bít chỉ gồm có số 0
D. Là một dãy bit chỉ gồm có số 1
Câu 4. Trong pascal để lưu một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Vào Fileà save d. Alt + F4
Câu 8. Ngôn ngữ được sử dụng để viết chương trình là gì?
A. Ngôn ngữ lập trình
B. Ngôn ngữ máy
C. Ngôn ngữ tự nhiên
D. Ngôn ngữ tiếng Việt
Câu 9. Vì sao cần phải viết chương trình máy tính?
A. Để con người điều khiển máy tính một cách đơn giản và hiệu quả hơn
B. Vì con người muốn máy tính thực hiện các công việc rất đa dạng và phức tạp
C. Vì máy tính và con người rất hiểu nhau
D. Vì máy tính rất thông minh
Chủ đề 2. Làm quen với chương trình và ngôn ngữ lập trình
Câu 2. Từ khóa nào dùng để khai báo tên chương trình?
a. Integer b. Var c. Const d. Program
Câu 5 : Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?
a. a8b b. beginend c. begin d. Bai tap
Câu 8. Trong pascal để lưu một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Vào Fileà save d. Alt + F4
Câu 9. Trong pascal để chạy một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Ctrl+F9 d. Alt + F4
Câu 10. Trong pascal để dịch một chương trình chúng ta có thể thực hiện bằng cách nào sau đây?
a. Nhấn phím F2 b. Nhấn Alt + F9 c. Ctr+F9 d. Ctrl + F5
Chủ đề 3. Chương trình máy tính và dữ liệu
Câu 3. Ký hiệu của phép toán chia trong ngôn ngữ lập trình pascal được viết như thế nào?
A. X B. * C. / D. ^
Câu 5. Phép so sánh “<=” là ký hiệu của phép so sánh nào sau đây?
A. Bằng nhau B. Khác nhau C. Lớn hơn hoặc bằng D. Bé hơn hoặc bằng
Câu 6. Phép so sánh “=>” là ký hiệu của phép so sánh nào sau đây?
A. Bằng nhau B. Khác nhau C. Lớn hơn hoặc bằng D. Bé hơn hoặc bằng
Câu 7. Phép toán DIV trong pascal là phép toán gì?
B. Phép chia b. Phép nhân c. Chia lấy phần nguyên d. Chia lấy phần dư
Câu 9. Kiểu dữ liệu của biểu thức A là gì? A := 4+5- 2
A. Số nguyên B. Số thực C. Xâu ký tự D. Ký tự
Câu 10. Kiểu dữ liệu của biểu thức A là gì? A := ‘4+5-2’
A. Số nguyên B. Số thực C. Xâu ký tự D. Ký tự
Chủ đề 4. Sử dụng biến trong chương trình
Câu 2: Khai báo nào sau đây đúng?
A. Var x, y: Integer; B. Var x, y=Integer;
C. Var x, y Of Integer; D. Var x, y := Integer;
Câu 3: Trong Pascal, từ khóa để khai báo biến là gì?
A. Const B. Begin C. Var D. Uses
Câu 4: Trong Pascal, từ khóa để khai báo hằng là gì?
A. Const B. Begin C. Var D. Uses
A. X:=4.1; B. X:=324.2 C. A:= ‘3242’; D. A:=3242 ;
Câu 7: Khai báo sau có ý nghĩa gì?
Var a: Real; b: Char;
A. Biến a thuộc kiểu dữ liệu số thực và biến b thuộc kiểu dữ liệu kí tự
B. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu xâu kí tự
C. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu kí tự
D. Biến a và b đều kiểu số thực
Câu 10: Đại lượng được đặt tên dùng để lưu trữ dữ liệu, có giá trị không đổi trong suốt quá trình thực hiện chương trình được gọi là gì?
A. Tên B. Từ khóa C. Biến D. Hằng
Chủ đề 5. Từ bài toán đến chương trình
Câu 4: Hãy xác đinh bài toán sau: "Tính tổng của hai số a và b, biết a và b được nhập vào từ bàn phím?”
A. INPUT: Hai số a và b. OUTPUT: Tổng của a và b.
B. INPUT: Tổng của a và b. OUTPUT: Số a và b.
C. INPUT: Số a. OUTPUT: Số b.
D. INPUT: Số b. OUTPUT: Số a.
Câu 5: Hãy chọn phát biểu đúng trong các phát biểu sau?
A. Các bước giải bài toán trên máy tính là: Mô tả thuật toán → Xác định bài toán → Viết chương trình
B. Cần phải xác định bài toán trước khi giải bài toán trên máy tính
C. Máy tính có hiểu được chương trình viết bằng ngôn ngữ tự nhiên
D. Với mỗi bài toán cụ thể, phải lựa chọn ngôn ngữ lập trình phù hợp rồi mới xây dựng thuật toán giải bài toán đó
Câu 6: Hãy chọn phát biểu sai trong các phát biểu sau?
A. Việc thực hiện cả 3 bước khi giải bài toán trên máy tính là cần thiết, nhất là đối với bài toán phức tạp
B. Xác định bài toán là xác định rõ các điều kiện cho trước và kết quả cần thu được
C. Dãy hữu hạn các thao tác cần thực hiện để giải một bài toán được gọi là thuật toán
D. Đối với mỗi bài toán cụ thể chúng ta chỉ có 1 thuật toán duy nhất để giải bài toán đó trên máy tính
Câu 9: Mô tả thuật toán là làm gì?
A. Liệt kê các bước thực hiện công việc.
B. Liệt kê các cách thực hiện công việc.
C. Liệt kê một bước thực hiện công việc.
D. Liệt kê hai bước thực hiện công việc
Câu 10: Mô tả thuật toán pha trà mời khách
+ B1: Tráng ấm, chén bằng nước sôi
+ B2: Rót nước sôi vào ấm và đợi khoảng 3 đến 4 phút.
+ B3: Cho trà vào ấm
+ B4: Rót trà ra chén để mời khách.
A. B1- B3-B4- B2
B. B1- B3- B2-B4
C. B2-B4-B1-B3
D.B3-B4-B1-B2
Chủ đề 6. Câu lệnh điều kiện
Câu 4: Ta có 2 lệnh sau:
x:= 8; If x>5 then x := x +1; Giá trị của x là bao nhiêu?
A. 5 B. 9 C. 8 D. 6
Câu 6: Để tìm giá trị lớn nhất của 2 số a, b thì ta viết như thế nào?
A. Max:=a; If b>Max then Max:=b; B. If a<b then Max:=a else Max:=b;
C. Max:=b; If a>Max then Max:=a; D. If a> Min then Max:=b else Max:= a;.
Câu 9: Chọn câu lệnh Pascal hợp lệ trong các câu sau:
A. If x := a + b then x : = x + 1; B. If a > b then max = a;
C. If a > b then max := a else max : = b; D. If 5 := 6 then x : = 100;
Câu 10: Hãy cho biết giá trị của biến X bằng bao nhiêu sau khi thực hiện câu lệnh:
X:= 10;
IF (91 mod 3) = 0 then X :=X+20;
A. 10 B. 30 C. 2 D. 1
****** HẾT ******
Nêu các ví dụ về cách sử dụng từ khóa và tên chương trình trong pascal
vd:
Program chuongtrinhnhapmang;
var n:integer;
begin
write('Nhap n='); readln(n);
end;
Những từ in đậm là từ khóa
in nghiêng là tên chương trình
Viết chương trình con chuyển các từ viết thường sang viết hoa. (trong pascal)
Vd: pascal sang PASCAL
Program Doi_Sang_Chu_Hoa;
Var S , SH: String; i : Byte;
Begin
Write('Nhap vao mot chuoi chu thuong : '); Readln(S);
SH := ''; {tạo xâu rỗng SH}
For i := 1 to Length(S) do SH[i] := UpCase(S[i];
Write('Chuoi da doi sang chu hoa: ',SH);
Readln;
End.
bạn dùng hàm UpCase(kí tự) để đổi từ chữ thường sang chữ hoa
Program Chuoi_In_Hoa;
Uses Crt;
Var i:integer;st:string;
Begin
Clrscr;
Writeln(‘DOI CHUOI SANG CHUOI HOA’);
Write(‘Nhap ho ten:’);readln(st); st[1]:=upcase(st[1]);
For i:=1 to length(St) do
If st[i]=’ ‘ then st[i+1]:=upcase(st[i+1]); Writeln(‘Ho ten sau khi doi lan 1 la: ‘,st);
For i:=1 to length(St) do st[i]:=upcase(st[i]);
Writeln(‘Ho ten sau khi doi lan 2 la: ‘,st);
Readln;
End.
program helo;
ues crt;
var s:string;i:longint
begin
clrscr;
write('s:=');readln(s);
for i:=1 to length(s) do s[i]:=upcase(s[i]);
writeln('s sau khi duoc doi sang chu hoa la');
readln;
end.
Viết chương trình đơn giản bằng cách sử dụng dấu "*" để tạo thành 1 hình tam giác ( chương trình Pascal)
Tam giác dạng gì vậy bạn? Cân, đều hay là thường
Sử dụng ngôn ngữ lập trình Pascal để viết chương trình sau :
Hãy nhập vào bàn phím một xâu S rồi đưa ra màn hình tất cả các từ của xâu đó.
Định nghĩ về từ : Từ là một dãy các kí tự liên tiếp cách nhau bởi dấu cách
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
readln(st);
d:=length(st);
for i:=1 to d do
begin
if st[i]=' ' then writeln
else write(st[i]);
end;
readln;
end.
cách lưu chương trình trên free pascal vào ổ đĩa D
hãy lập chương trình trên pascal tính số dấu cách trong xâu
uses crt;
var st:string;
d,i,dem:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
dem:=0;
for i:=1 to d do
if st[i]=#32 then inc(dem);
writeln('So dau cach trong xau la: ',dem);
readln;
end.
Câu 1: chuyển biểu thức toán học sang pascal:
a.
b. 15.(4 + 30 + 12)
c. (a+b)2.(d+e)3
d. ax2 + bx +2c
Câu 2: viết chương trình tính tích 2 số nguyên được nhập từ bàn phím.
Câu 3: viết chương trình tính tổng 2 sô nguyên được nhập từ bàn phím.
Câu 4: viết chương trình nhập vào 2 số nguyên a, b sau đó in a, b trước và sau khi hoán đổi vị trí ra màn hình.
Câu 5: viết chương trình tính tiền hóa đơn mua một món hàng, biết phí dịch vụ của hóa đơn là 10.000đ và công thức tính tiền là:
Thành tiền = đơn giá * số lượng + phí dịch
Câu 6: Cho biết kết quả của các phép so sánh sau:
a, 2x + 1 = 0
b, x2 – 5 > 4
c, 112 > 100
d, x2 + 3 = 7
Câu 1:
b, 15*(4+30+12)
c, (a+b)^2*(d+e)^3
d, a*x^2+b*x+2*c
Câu 2:
#include <bits/stdc++.h>
using namespace std;
long long x,y;
int main()
{
cin>>x>>y;
cout<<x*y;
return 0;
}
pascal viết chương trình đọc một số tự nhiên có 4 chữ số được nhập từ bàn phím khi đọc từ phải bỏ chữ số 0 vô nghĩa xuất ra màn hình cách đọc bằng chữ của số đó
Program HOC24;
var x: integer;
begin
write('Nhap so: '); readln(x);
if x div 1000=1 then write('Mot nghin ');
if x div 1000=2 then write('Hai nghin ');
if x div 1000=3 then write('Ba nghin ');
if x div 1000=4 then write('Bon nghin ');
if x div 1000=5 then write('Nam nghin ');
if x div 1000=6 then write('Sau nghin ');
if x div 1000=7 then write('Bay nghin ');
if x div 1000=8 then write('Tam nghin ');
if x div 1000=9 then write('Chin nghin ');
if x div 1000<>0 then
if x div 100=0 then write('khong tram ');
if x div 100=1 then write('mot tram ');
if x div 100=2 then write('hai tram ');
if x div 100=3 then write('ba tram ');
if x div 100=4 then write('bon tram ');
if x div 100=5 then write('nam tram ');
if x div 100=6 then write('sau tram ');
if x div 100=7 then write('bay tram ');
if x div 100=8 then write('tam tram ');
if x div 100=9 then write('chin tram ');
if (x div 1000<>0) or (x div 100<>0) then
begin
if (x div 10<>0) then
begin
if x div 10=1 then write('muoi ');
if x div 10=2 then write('hai muoi ');
if x div 10=3 then write('ba muoi ');
if x div 10=4 then write('bon muoi ');
if x div 10=5 then write('nam muoi ');
if x div 10=6 then write('sau muoi ');
if x div 10=7 then write('bay muoi ');
if x div 10=8 then write('tam muoi ');
if x div 10=9 then write('chin muoi ');
if x mod 10=1 then write('mot');
if x mod 10=2 then write('hai');
if x mod 10=3 then write('ba');
if x mod 10=4 then write('bon');
if x mod 10=5 then write('lam');
if x mod 10=6 then write('sau');
if x mod 10=7 then write('bay');
if x mod 10=8 then write('tam');
if x mod 10=9 then write('chin');
end else
begin
if x mod 10=1 then write('le mot');
if x mod 10=2 then write('le hai');
if x mod 10=3 then write('le ba');
if x mod 10=4 then write('le tu');
if x mod 10=5 then write('le nam');
if x mod 10=6 then write('le sau');
if x mod 10=7 then write('le bay');
if x mod 10=8 then write('le tam');
if x mod 10=9 then write('le chin');
end;
readln
end.