uses crt;
var n,i:longint;
t:real;
begin
clrscr;
write('n='); readln(n);
if (1<=n) and (n<=10000) then
begin
t:=0;
for i:=1 to n do
t:=t+(1/(sqr(i)));
writeln('T=',t:4:2);
end
else writeln('vui long nhap lai n');
readln;
end.
Cho hai số nguyên dương N và K. Có bao nhiêu số nguyên dương không vượt quá N có tổng các chữ số chia hết cho K.
Ví dụ 1: N = 100; K = 3 thì kết quả là 33
Ví dụ 2: N = 22; K = 4 thì kết quả là 5.
Bài 1: Viết 1 chương trình bằng ngôn ngữ lập trình pascal thực hiện các công việc sau:
+Nhập từ bàn phím độ dài cạnh của 1 hình vuông.
+Tính chu vi, diện tích hình vuông đó.
+Hiện kết quả chu vi & diện tích ra màn hình, kết quả có 4 chữ số thập phân.
+ Nếu diện tích là số chẵn thì thông báo ra màn hình HINH VUONG CHAN, ngược lại thông báo HINH VUONG LE .
Bài 2: Viết 1 CT bằn ngôn ngữ lập trình pascal thực hiện các công việc sau:
+ Nhập từ bàn phím 3 số nguyên x,y,z .
+Nếu 3 số này âm thì tính giá trị biểu thức S1=3x+2y và S2=6-7y. Hiện kết quả ra màn hình.
Bài 3: Hãy viết 1 CT bằng ngôn ngữ lập trình pascal giải bài toán:
Theo quy định của Đoàn trường Ân thi, mỗi học sinh vi phạm nội quy sẽ bị trừ điểm như sau:
Đi học muộn trừ 5 điểm
Không đeo thẻ trừ 5 điểm
Không đội mũ bảo hiểm trừ 15đ
Trong đợt thi đua chào mừng ngày Nhà giáo Việt Nam năm nay, lớp 11A7 có:
a trường hợp đi học muộn; b trường hợp k đeo thẻ; c trường hợp k đội mũ bảo hiểm
-Hãy nhập a,b,c từ bàn phím.
-Tính tổng số điểm mà 11a7 bị trừ trong đợt. Hiện kết qura ra màn hình.
-Thầy giáo chủ nhiệm lớp 11a7 có thông báo: nesu trong đợt thi đia này lớp bị trưc từ 10 điểm trở xuống thì cuối đợt lớp sẽ tổ chức liên hoan. Em hãy xho biết lớp 11a7 có đc tổ chức buổi liên hoan đó k.
Viết chương trình tính tổng 50 số tự nhiên đầu tiên S= 1+2+3+4+…..+50
Bài 17: Số Pibonaci.
a. Tạo ra dãy n số Fibonaci. Ví dụ nhập n = 8 thì in ra 8 số Fibonaci 1 1 2 3 5 8 13 21
b.Tìm số thứ N của dãy Pibonaci. Ví dụ nhập n = 6 thì in ra số 8
Viết chương trình so sánh cân nặng của 2 bạn an và bình biết cân nặng của 2 bạn là số thực
Các bạn ơi giúp mình với bạn nào trả lời đc thì mình cho điểm nhé.
1. Hãy cho biết hoạt động nào dưới đây là để lưu trữ thông tin?
A. Ghi chép lại bài giảng vào vở.
B. Sử dụng máy tính cầm tay để tích lũy thừa.
C. Sử dụng máy ghi âm để thu âm 1 bài hát.
D. Chụp ảnh khi tơi thăm 1 danh lam thắng cảnh.
E. Sử dụng ống nhòm để quan sát chiếc tàu thủy trên biển.
2. Hãy cho biết hoạt động nào dưới đây là để trao đổi thông tin?
A. 1 diễn giả đang diễn thuyết trước người nghe.
B. 2 học sinh đang thảo luận với nhau để giải bài tập.
C. Khách hàng trả tiền để mua 1 món hàng ở chợ.
D. Người lái xe ô tô bóp còi để xin đường , nháy đèn xi-nhan trước khi rẽ.
E. Bố em đang xem chương trình thời dự trên ti vi.
Các bạn giúp mình với nhé, cảm ơn.
làm giúp mình đề này với , toàn bộ nha : (sgk tin học 6 bài 1 phần câu hỏi và bài tập)
cho dãy số A gồm n phần tử (0<n<100)
Viết chương trình thực hiện các yêu cầu sau
1.xây dựng hàm nhập cho phép nhập n phần tử từ bàn phím
2.xây dựng hàm in dãy cho phép in dãy A ra màn hình
3.xây dựng hàm sắp xếp để sắp dãy A theo thứ tự giảm dần theo phương pháp phân đoạn
4.Xây dựng hàm chính để thực hiện gọi các hàm trên
Viết chương trình nhập vào tử và mẫu của phân số in ra phân số tối giản
