Trắc nghiệm Lập trình Cấu trúc Pascal - Đại học Kinh doanh và Công nghệ Hà Nội (HUBT)
Từ khoá: trắc nghiệm Lập trình Pascal Cấu trúc Pascal Đại học Kinh doanh và Công nghệ Hà Nội HUBT cú pháp Pascal kiểu dữ liệu Pascal vòng lặp Pascal hàm và thủ tục ôn tập lập trình câu hỏi trắc nghiệm luyện thi công nghệ thông tin
Thời gian làm bài: 1 giờ
Hãy bắt đầu chinh phục nào!
Xem trước nội dung:
type
IntList = array[1..100] of Integer;
CharData = array{'A'..'Z'} of Byte;
"Cộng hoà xã hội chủ nghĩa Việt Nam".
Var St:sting[20];
Begin
Readln(st);
Writeln('chuỗi được in ra là:', st);
End.
Writeln('KQ là: ',a);
màn hình sẽ in ra kêt quả nào?
Var
a,b,c:Real;
Begin;
D:= b*b - 4 *a*c;
Writeln ('D = ', D);
End.
Var
Procedure Vao;
A,b,s: Real;
Begin
a:=5;
b:=4;
End;
Begin
Vao;
s:=a+b;
Writeln('s=',s);
End.
I:=7;
Min:=2;
Max:=6;
if (I < Min) or (I > Max) then I:= 0;
Procedure chuyen;
Var X,Y: integer;
Begin
X: = 15;
Y:= 20;
GoToxy(X,Y);
Write('lop tin 3');
End;
s:=0;
For I:=1 to 100 do
S:=s+I;
1. Var
2. Maxdata=1..Integer;
3. numchars=1..10;
4. message = '1'..'2';
Var a,b:integer;
Procedure vidu(x:integer,var Y:integer)
Begin
X:=x+1
Y:=y+1;
End;
Begin
A:=0; b:=3;
Vidu(a,b)
Write(a:3,b:3);
END.
Var
i: Integer;
s,a,b: Real;
Begin
b:=0.5;
a:=1; I:=1; s:=0;
Repeat
s:=s+a;
i:=i+1;
a:=1/i;
Until a<=b;
Writeln ( ' Tong = ', S );
End.
Type
a = Record
Hoten: String[20];
Ngaysinh: String[8];
Lương: real;
End;
Ns: Array[1..20] of A;
Var Nhansu: Ns;
Program ViDu;
Var
S,i:Integer;
Begin
I:=1;
S:=2;
S:=S+I;
S:=S*S;
Writeln(S);
End.
Procedure Vao;
A,b,s: Real;
Begin
a:=5.0;
b:=4.0;
End;
Begin
Vao;
s:=a+b;
Writeln('s=',s);
End.
var a,b,s: string;
c,d,t,p: integer;
Begin
read(a,b,c,d);
s:=a+b;
t:=a+c;
p:=a+d;
writeln(s: 4,t: 4, p:4)
end;
p:=2;
if P <> 2 then
Writeln('P=',20);
else
Writeln('P=',120);
A:=34;
B:=78;
If a < b Then
Max:=b
Else
max:=a;
writeln(max);
Label 3;
Var
Tong, I: integer;
Begin
Tong:=0;
I:=1;
tong:=tong+I;
I:=I+1;
If I<=2 then goto3;
Writeln('tong=', tong);
End.
SQR(x) là hàm:
Trị tuyệt đối của x
Bình phương của một số nguyên hay số thực
Căn bậc hai của x
Cắt bỏ phần thập phân của x nếu có
Khi tạo một thư viện chương trình thì tên thư viện phải:
Trùng tên File
Khác tên File
Khai báo sau từ khoá interface
Viết hoa
Var x:integer;
Begin
Write(‘nhap x=’);readln(x);
Write(sqrt(sqr(x)));
End.
type
IdentRec = Record
aref: string[15];
RefCount: integer;
end;
begin
Writeln(sqr(4));
Đoạn mã sau in kết quả nào?
Var
procedure vao;
a,b,s: real;
Begin
a:=5;
b:=4;
end;
Begin
vao;
s:= a+b;
writeln('s=',s);
end.
s=-9
s=9
s=0
không xác định, chương trình có lỗi
Để so sánh các giá trị Kiểu boolean ta có:
False>true
true=false
true
true>false
var a, b, c:real;
d:=b*b-4*a*c;
Writeln('d=',d);
End.
var a,b,s: real;
procedure vao;
Begin
a:=2;
b:=6;
end;
Begin
vao;
s:= a+b;
writeln('s=',s);
end.
Thủ tục sau thực hiện công việc gì?
Var
I: integer;
F: File of Integer;
Begin
Assign (F, 'So.dat');
Rewrite (F);
I:=1;
While i<=99 Do
Begin
Write (F, i);
I:=i+2;
End;
Close (F);
End.
Tạo một tệp số nguyên
Tạo một tệp số nguyên tố
Tạo một tệp số nguyên lẻ
Tạo một tệp số nguyên chẵn
Var
Tong, I: Integer;
Begin
Tong:=0;
I:=1;
Repeat
Tong:= Tong+I;
I:=i+1;
Until i>1;
Writeln('Tong=',tong);
End.
Xem thêm đề thi tương tự
Tham khảo đề thi trắc nghiệm Lập Trình Cấu Trúc với ngôn ngữ Pascal dành cho sinh viên Đại học Kinh doanh và Công nghệ Hà Nội (HUBT). Đề thi bao gồm các câu hỏi từ cơ bản đến nâng cao, giúp sinh viên củng cố kiến thức về lập trình cấu trúc, các thuật toán và cách triển khai bằng Pascal. Đáp án chi tiết kèm theo hỗ trợ quá trình ôn tập và chuẩn bị kỹ lưỡng cho các kỳ thi và kiểm tra môn Lập Trình tại HUBT.
104 câu hỏi 3 mã đề 1 giờ
144,319 lượt xem 77,646 lượt làm bài
200 câu hỏi 4 mã đề 1 giờ
322,327 lượt xem 173,521 lượt làm bài
Tham khảo ngay bộ tài liệu tổng hợp câu hỏi trắc nghiệm Điều Khiển Lập Trình và PLC + BTD từ Đại học Điện Lực, miễn phí và kèm đáp án chi tiết. Tài liệu bao gồm các câu hỏi trắc nghiệm bám sát chương trình học, giúp sinh viên ôn tập kiến thức về điều khiển lập trình, hệ thống PLC và bài tập thực hành (BTD). Đây là tài liệu hữu ích để chuẩn bị cho các kỳ thi giữa kỳ và cuối kỳ, hỗ trợ quá trình học tập và luyện thi hiệu quả.
50 câu hỏi 1 mã đề 1 giờ
71,039 lượt xem 38,193 lượt làm bài
Tham gia trắc nghiệm Lập Trình Trực Quan cơ sở và nâng cao miễn phí tại Đại Học Kinh Doanh Và Công Nghệ Hà Nội (HUBT), kèm theo đáp án chi tiết. Bộ câu hỏi bao gồm các khái niệm cơ bản và các kỹ thuật nâng cao trong lập trình trực quan, giúp sinh viên nắm vững kiến thức về giao diện, xử lý sự kiện, và phát triển phần mềm trực quan. Đây là tài liệu ôn tập hiệu quả cho các kỳ thi và bài kiểm tra môn Lập Trình Trực Quan tại HUBT. Hãy kiểm tra ngay kiến thức của bạn và chuẩn bị tốt cho kỳ thi với hệ thống câu hỏi có đáp án cụ thể.
265 câu hỏi 7 mã đề 1 giờ
143,736 lượt xem 77,350 lượt làm bài
60 câu hỏi 1 mã đề 1 giờ
13,401 lượt xem 7,203 lượt làm bài
114 câu hỏi 3 mã đề 1 giờ
18,361 lượt xem 9,870 lượt làm bài
245 câu hỏi 5 mã đề 1 giờ
46,051 lượt xem 24,787 lượt làm bài
240 câu hỏi 6 mã đề 1 giờ
14,886 lượt xem 8,008 lượt làm bài
Bạn đang tìm kiếm đề thi trắc nghiệm lập trình PLC phần 3 của Đại Học Điện Lực (EPU)? Tại đây, chúng tôi cung cấp bộ đề thi trắc nghiệm lập trình PLC phần 3 với đầy đủ đáp án và hoàn toàn miễn phí. Bộ tài liệu giúp sinh viên nắm vững kiến thức từ cơ bản đến nâng cao về lập trình PLC, luyện tập với các câu hỏi trắc nghiệm bám sát nội dung thi. Phù hợp cho các bạn sinh viên ngành kỹ thuật điện, tự động hóa, tài liệu này sẽ là công cụ hữu ích trong việc ôn tập và chuẩn bị cho kỳ thi hiệu quả. Tải ngay để có đáp án chính xác và sẵn sàng cho kỳ thi sắp tới.
25 câu hỏi 1 mã đề 40 phút
90,628 lượt xem 48,760 lượt làm bài