Chương trình đơn giản
Các câu hỏi tương tự
Câu 1(3đ). Hãy khai báo mảng một chiều lưu trữ 100 phần tử số nguyên có giá trị trong khoảng từ 0 đến 255 bằng cách: a. Trực tiếp; b. Gián tiếp: c. Tham chiếu đến phần tử thứ 50 và gán giá trị bằng 45. Câu 2(4đ). Viết chương trình nhập N và N số nguyên a,, a2,..an. Tính tổng các phần tử chăn chia hết cho 3. Câu 3 (3đ). Cho đoạn chương trình sau: a. Với: N6; k8 A 45 56 73 64 55 98 Program Bai3; Type KM-array[1..100] of LongInt; Var a:KM; i,N, k:Integer; Begin Write(Nhap N );Readln (N); Write(Nhap...
Đọc tiếp
Câu 1(3đ). Hãy khai báo mảng một chiều lưu trữ 100 phần tử số nguyên có giá trị trong khoảng từ 0 đến 255 bằng cách: a. Trực tiếp; b. Gián tiếp: c. Tham chiếu đến phần tử thứ 50 và gán giá trị bằng 45. Câu 2(4đ). Viết chương trình nhập N và N số nguyên a,, a2,..an. Tính tổng các phần tử chăn chia hết cho 3. Câu 3 (3đ). Cho đoạn chương trình sau: a. Với: N=6; k=8 A= 45 56 73 64 55 98 Program Bai3; Type KM-array[1..100] of LongInt; Var a:KM; i,N, k:Integer; Begin Write('Nhap N= ');Readln (N); Write('Nhap k= '); Readln (k); For i:-1 to n do Begin Write(Nhap a[',I,']= '); Readln(a[i]); If trunc (sqrt (a(i]))=k then Write (i:6); End; Chương trình sẽ đưa ra kết quả gì? b. Với: N=6; k=5 A= 45 56 73 64 55 98 Chương trình sẽ đưa ra kết quả gì? c. Sửa điều kiện lệnh If thành kiểm tra xem a[i] có là số chính phương hay không? (Số chính phương là: x2 = ai. VD 9 = 32; 16 = 42; 81 = 92) Readln; End.
Cho đoạn chương trình sau:
Begin
x:=a;
if a < b then x:=b;
End.
Cho a= 20; b=15. Kết quả x bằng bao nhiêu?
A. 20
B.15
C.18
D.25
(Giải thích nữa ạ)
Cho đoạn chương trình sau:
i : = 1; S := 0;
While i < 0 do
Begin
S : = S +2;
i : = i+1;
End;
Đoạn chương trình trên sẽ cho kết quả S là
A. 20
B. 10
C. 14
D.18
( Giải thích nữa ạ)
Cho biến số thực y, muốn hiện kết quả của y ra màn hình với 4 chữ số sau dấu chấm thập phân ta viết thế nào?
A. write(y:4:14);
B. write(y:4:10);
C. write(y:4:4);
D. writeln(y:4);
Cho biến số thực y, muốn hiện kết quả của y ra màn hình với 4 chữ số sau dấu chấm thập phân ta viết thế nào?
A. write(y:4:14);
B. write(y:4:10);
C. write(y:4:4);
D. writeln(y:4);
Begin
i:= 123456;
Writeln(i);
Write(-789);
End.
Kết quả hiện ra màn hình của chương trình trên là:
A. Tất cả 3 đáp án kia đều sai.
B. 123456-789
C. 123456
-789
D. 123456
789
Begin
i:= 123456;
Writeln(i);
Write(-789);
End.
Kết quả hiện ra màn hình của chương trình trên là:
A. Tất cả 3 đáp án kia đều sai.
B. 123456-789
C. 123456
-789
D. 123456
789
Cho 2 số nguyên k và m. Kết quả sau khi thực hiện đoạn chương trình sau là gì?
k:=2500; m:=50;
writeln (k/m:2:3)
A. 2500/50:2:3
B.. Chương trình báo lỗi (vì 2<3)
C. 50.000
D. 8.333
Cho 2 số nguyên k và m. Kết quả sau khi thực hiện đoạn chương trình sau là gì?
k:=2500; m:=50;
writeln (k/m:2:3)
A. 2500/50:2:3
B.. Chương trình báo lỗi (vì 2<3)
C. 50.000
D. 8.333