các bước khởi đông chương trình TURBO PASCAL
Khởi động phần mềm Turbo Pascal rồi viết chương trình nhận biết một số tự nhiên N được nhập vào từ bàn phím có phải số nguyên tố hay không? *Yêu cầu: 1) viết chương trình như trên 2) em hãy dịch và sửa lỗi chương trình(nếu có)
uses crt;
var i,n,kt:integer;
begin
clrscr;
readln(n);
kt:=0;
for i=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if (kt=0) and (n>1) then write('phai')
else write('Khong phai');
readln;
end.
Var i,n,souoc:integer;
Begin
While n <= 1 do
Begin
Write('Nhap n = ');readln(n);
End;
For i:=1 to n do
If n mod i = 0 then souoc:=souoc+1;
If souoc = 2 then write(n,' la so nguyen to')
Else write(n,' khong la so nguyen to');
Readln;
End.
sử dụng chương trình turbo pascal
tính tổng các số tự nhiên chẵn<10000
các số tự nhiên chẵn < 10000 là:
0; 2; 4; 6;...; 9998
Số số hạng của dãy là:
( 9998- 0) : 2 +1 = 5000 ( số hạng)
Tổng dãy trên là:
( 9998 +0) x 5000 : 2 = 24995000
Dưới đây là một chương trình viết trong Pascal:
program CT_Dau_tien ;
Uses crt ;
begin
writeln ( ‘Toi la Turbo Pascal’ )
end.
Tên chương trình là:
A begin. B. end C. writeln D. crt
1 là bn sửa hình nền
2 là mk gọi admin hoặc giáo viên khác khoá nick bn
Làm thế nào để phóng to (mở rộng) chương trình Turbo Pascal?
Truc Thanh chương trình Turbo Pascal pn tải về máy tính của pn r thì không mở rộng đk đâu.
Để phóng to ( mở rộng ) chương trình Turbo Pascal ta nhấn tổ hợp phím Alt + Enter
nó chỉ to bằng đấy thôi, không mở rộng được đâu bạn ơi
a. Vt chương trình =nnlt pascal Mô tả thuật toán sau Bước 1. S←1;n←0 Bước 2. Nếu s>=10;chuyển bước 4 Bước 3. N←n+2,s←s+n; quay bước 2 Bước 4 thông báo s và KT thuật toán b. khởi động phần mềm Free pascal soạn thảo lưu dịch chạy trương trình quan sát kết quả
Program HOC24;
var S,n: integer;
begin
s:=1; n:=0;
while s<10 do
begin
n:=n+2;
s:=s+n;
end;
write('S= ' ,s);
readln
end.
Câu 1 : Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal.
A. 8a A. tamgiac C. program D. bai tap
Câu 2 : Để chạy chương trình trong Turbo Pascal ta dùng tổ hợp phím nào ?
A. Ctrl + F9 B. Alt + F9 C. F9 D. Ctrl + Shitf + F9
Câu 3 : Trong Pascal, khai báo nào sau đây là đúng cho khai báo biến ?
A. Var tb: real; B. Type 4hs: integer; C. Const x: real; D. Var R = 30;
Câu 4 : Biểu thức toán học (a2 + b)(1 + c)3 được biểu diễn trong Pascal như thế nào ?
A. (a*a + b)(1+c)(1 + c)(1 + c) B. (a.a + b)(1 + c)(1 + c)(1 + c)
C. (a*a + b)*(1 + c)*(1 + c)*(1 + c) D. (a2 + b)(1 + c3
Câu 5: Để nhập dữ liệu ta dùng lệnh:
A.Clrscr; B.Readln(x); C. X:= ‘dulieu’; d.Write(‘Nhap du lieu’);
Câu 6 : Bốn bạn A, B, C, D đưa ra kết quả của phép chia, phép chia lấy phần nguyên và lấy phần dư của hai số nguyên 14 và 5 như sau :
A. 14/5 =2; 14 div 5 = 2; 14 mod 5 = 4 B. 14/5 =2.8; 14 div 5 = 2; 14 mod 5 = 4
C. 14/5 =2.8; 14 div 5 = 4; 14 mod 5 = 2 D. 14/5 =3; 14 div 5 = 2 ; 14 mod 5 = 4
Hãy chọn bạn làm đúng
Câu 7. Những từ nào sau đây là từ khoá?
A. Begin, Uses, End, Thong bao B. Program, Begin, char, Uses,
C. Var, Const, Write D. Program, Begin, Uses, end
Câu 8. Trong cấu trúc chương trình Pascal, phần nào là phần bắt buộc phải có?
A. Phần tiêu đề chương trình B. Phần thân chương trình
C. Phần khai báo thư viện D. Phần khai báo biến.
Phần 2 : Tự luận
Câu 9 : Viết các biểu thức toán sau đây dưới dạng biểu thức Pascal : (3 điểm)
a. 15x2 + 30 (x+2) b. c.
Câu 10 : (3 điểm)
Viết chương trình nhập vào 2 số nguyên a, b từ bàn phím, tính trung bình cộng (TB) của hai số a, b và in kết quả ra màn hình.
Câu 1: B
Câu 2: A
Câu 3: A
Câu 4: C
Câu 5: B
1/Trong các công việc sau, công việc nào không thuộc lĩnh vực Điều khiển, tự động hoá, thiết kế chế tạo?
a Dùng Turbo Pascal 7.0 viết chương trình giải phương trình bậc hai
b Hệ thống phần mềm phục vụ giao dịch nhiều người tại phòng bán vé máy bay của hãng Hàng không quốc gia Việt Nam
c Dùng các phần mềm đồ hoạ để thiết kế nhà cửa
d Dùng phần mềm VDM của viện chăn nuôi Việt Nam và hệ thống máy tính trong chăn nuôi sữa bò
2/ Trong các công việc sau, công việc nào thuộc lĩnh vực Truyền thông?
a Đài truyền hình Hà Nội triển khai truyền hình số qua mặt đất, vệ tinh và cáp quang
b Dùng phần mềm Word soạn thảo một văn bản
c Chơi trò chơi Liên Minh Huyền Thoại
d Giờ học dùng giáo án điện tử
Các câu lệnh ra / vào dữ liệu trong ngôn ngữ lập trình Turbo Pascal
Sau khi thực hiện đoạn chương trình sau giá trị của x bằng bao nhiêu?
If(15 mod 3) then x:=3 esle x:=19
turbo pascal lp 8. mai mk thi hc kì r, m.n giúp mk nha