Lý Thuyết Lớp 12
Lý thuyết lớp 11
Lý thuyết lớp 10
Lý thuyết lớp 9
Lý thuyết lớp 8
Lý thuyết lớp 7
Lý thuyết lớp 6
Lý thuyết lớp 5
Lý thuyết lớp 4
Lý thuyết lớp 3
Lý thuyết lớp 2
Lý thuyết lớp 1
Thi vào lớp 10
Đại học
Thư viện câu hỏi
Thi Online
Hỏi bàiCho khai báo mảng hãy cho biết đoạn chương trình sau thực hiện công việc gì dưới đây?
Var a : array[0..50] of real ;
k := 0 ;
for i := 1 to 50 do
if a[i] > a[k] then k := i ;
A. Tìm phần tử nhỏ nhất trong mảng;
B. Tìm phần tử lớn nhất trong mảng;
C. Tìm chỉ số của phần tử lớn nhất trong mảng
D. Tìm chỉ số của phần tử nhỏ nhất trong mảng
Lời giải của giáo viên
ToanVN.com
Ý nghĩa của câu lệnh
Var a : array[0..50] of real ; {khai báo mảng a}
k := 0 ; {gán chỉ số 0 cho k}
for i := 1 to 50 do { vòng lặp chạy từ 1 đến 50}
if a[i] > a[k] then k := i ; { kiểm tra từ phần tử thứ 2 đến phần tử 50 so sánh với phần tử đầu và đưa ra chỉ số lớn nhât}
Đáp án: C
CÂU HỎI CÙNG CHỦ ĐỀ
Nhận định nào đúng cho khai báo sau: Var hoten : String;?
Trong Turbo Pascal, để chạy chương trình ta dùng tổ hợp nào?
Để thoát khỏi phần mềm Turbo Pascal ta dùng tổ hợp nào?
Mảng là kiểu dữ liệu biểu diễn một dãy các phần tử thuận tiện cho việc gì?
Với x, y, z là ba biến nguyên. Cách nhập giá trị nào sau đây là sai khi muốn nhập giá trị 3, 4, 5 cho ba biến này từ bàn phím bằng câu lệnh readln(x,y,z); ?
Đoạn chương trình sau sẽ in ra kết quả nào?
Program Welcome ;
Var a : string[10];
Begin
a := ‘tinhoc ’;
writeln(length(a));
End.
Hãy cho biết sau khi thực hiện đoạn lệnh sau thì tệp ketqua.txt có nội dung gì? Với f1 là biến tệp văn bản và tệp ketqua.txt có nội dung đang lưu trữ là: Tich 2 so la: 20
a := 10; b :=2;
assign(f1, 'ketqua.txt');
rewrite(f1);
writeln(f1, 'Thuong 2 so la: ', a/b);
