Tìm kiếm Đề thi, Kiểm tra
ĐỀ KT 1T THỰC HÀNH TIN HỌC 8 (CÓ ĐÁP ÁN)
(Tài liệu chưa được thẩm định)
Nguồn:
Người gửi: Phan Thị Thanh Hương
Ngày gửi: 15h:58' 03-12-2013
Dung lượng: 25.5 KB
Số lượt tải: 197
Nguồn:
Người gửi: Phan Thị Thanh Hương
Ngày gửi: 15h:58' 03-12-2013
Dung lượng: 25.5 KB
Số lượt tải: 197
Số lượt thích:
0 người
ĐỀ KIỂM TRA 1 TIẾT THỰC HÀNH
MÔN TIN HỌC 7
Thời gian làm bài: 45 phút
ĐỀ 1:
Bài 1: Tìm giá trị lớn nhất trong 4 số a,b,c,d (a,b,c,d được nhập từ bàn phím)
Bài 2: Tính chu vi và diện tích của hình tròn
Đáp án:
Câu 1:
Program Somax;
var a, b, c, d, max : integer;
begin
Write(`Nhap 4 so nguyen:`);
readln (a,b,c,d); max := a;
if max < b then max := b;
if max < c then max := c;
if max < d then max := d;
Writeln(`So lon nhat la:`,max);
Readln;
end.
Câu 2:
program hinhtron;
var r,cv,dt:real ;
begin
write(`Ban kinh r = `); readln(r);
cv:= 2*r*pi ; dt:= sqr(r)*pi;
writeln (`Chu vi = `,cv:5:2);
writeln (`Dien tich = `,dt:5:2);
Readln;
end.
MÔN TIN HỌC 7
Thời gian làm bài: 45 phút
ĐỀ 1:
Bài 1: Tìm giá trị lớn nhất trong 4 số a,b,c,d (a,b,c,d được nhập từ bàn phím)
Bài 2: Tính chu vi và diện tích của hình tròn
Đáp án:
Câu 1:
Program Somax;
var a, b, c, d, max : integer;
begin
Write(`Nhap 4 so nguyen:`);
readln (a,b,c,d); max := a;
if max < b then max := b;
if max < c then max := c;
if max < d then max := d;
Writeln(`So lon nhat la:`,max);
Readln;
end.
Câu 2:
program hinhtron;
var r,cv,dt:real ;
begin
write(`Ban kinh r = `); readln(r);
cv:= 2*r*pi ; dt:= sqr(r)*pi;
writeln (`Chu vi = `,cv:5:2);
writeln (`Dien tich = `,dt:5:2);
Readln;
end.
 
Các ý kiến mới nhất