-110
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