uses crt;
var a,i,n:integer;
s:real;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap n='); readln(n);
s:=0;
for i:=0 to n do
s:=s+1/(a+i);
writeln(s:4:2);
readln;
end.
Làm quen với tin học và máy tính điện tử
Các câu hỏi tương tự
Viết chương trình nhập vào 1 mảng a gồm 10 phần tử
a. In ra mảng và nhập
b. In ra các phần tử lẻ
c. In ra các phần tử chẵn
d. In ra các phần tử có giá trị bằng 5
e. In ra các phần tử chia hết cho 3
Giúp em với ạ
1.sử dụng lệnh while..do để
a)hiển thị dãy số 14-99
b)nhập vào 17 số nguyên .tính tổng và số chữ cái của tổng đó
2.nhập vào 15 số nguyên tính tổng có mấy chữ số
Mọi người ơi, em ko bt cách để làm ảnh đại diện(em đã làm nhưng một lúc sau nó lại mất). Mọi người giúp em với ạ!!! Em cảm ơn
1+1=
5 tháng 11 2019 lúc 20:05
Cho 3 số a,h lần lượt là số đo đáy và chiều cao tương ứng của 1 tam giác. Với a,h 1015
Lập trình tính diện tích tam giác đó.
- Với a,b,h cho trong file Stamgiac.inp gồm:
2 dòng o Dòng 1 ghi 2 số a,h mỗi số cách nhau một dấu cách
- Kết quả ghi vào trong file Stamgiac.out gồm:
1 dòng ghi diện tích tính được. (Kết quả làm tròn tới 2 chữ số thập phân)
stamgiac.inp
stamgiac.out
5 9 4
28.00
5,4 9,8 4,1
31.16
Đọc tiếp
Cho 3 số a,h lần lượt là số đo đáy và chiều cao tương ứng của 1 tam giác. Với a,h <1015
Lập trình tính diện tích tam giác đó.
- Với a,b,h cho trong file Stamgiac.inp gồm:
2 dòng o Dòng 1 ghi 2 số a,h mỗi số cách nhau một dấu cách
- Kết quả ghi vào trong file Stamgiac.out gồm:
1 dòng ghi diện tích tính được. (Kết quả làm tròn tới 2 chữ số thập phân)
| stamgiac.inp | stamgiac.out |
| 5 9 4 | 28.00 |
| 5,4 9,8 4,1 | 31.16 |
Thầy phynit ơi cho em hỏi cách hủy kết bạn với 1 tài khoản nào đó trên HOC24 ạ!
Viết chương trình tính tổng chuoi . S = 1^2 - 2 ^3 + 3^4 - 4^5 + ...±(n-1)^n Nhập n tính tổng S trên.
24 tháng 3 2020 lúc 20:52
Question Tin hoc
Câu 1: Trong Paint để khôi phục lại hình ảnh đã xóa ta ấn tổ hợp phím nào?
Câu 2: Hàm tính tổng trung bình cộng của 1 dãy số trong bảng tính điện tử là gì?
Câu 3: Câu lệnh nào sau đây là sai :
A. a:a+a;
B. If a mod b 1 do dec(t);
C. T:HOC24
D. Inc(d);
Câu 4: Viết chương trình nhập vào 1 mảng gồm n phần tử và đếm các số có chữ số hàng chục có đơn vị là 0.
Lưu ý : Dãy số được viết trên 1 dòng
Đọc tiếp
Question Tin hoc
Câu 1: Trong Paint để khôi phục lại hình ảnh đã xóa ta ấn tổ hợp phím nào?
Câu 2: Hàm tính tổng trung bình cộng của 1 dãy số trong bảng tính điện tử là gì?
Câu 3: Câu lệnh nào sau đây là sai :
A. a:=a+a;
B. If a mod b = 1 do dec(t);
C. T:=HOC24
D. Inc(d);
Câu 4: Viết chương trình nhập vào 1 mảng gồm n phần tử và đếm các số có chữ số hàng chục có đơn vị là 0.
Lưu ý : Dãy số được viết trên 1 dòng
nhập vào mảng 1 chiều A gốm N phần tử là các số nguyên (1<N<=10^6) và số nguyên K
a) tính tổng các số chia hết cho R
b) Đếm số lượng các số chia hết cho R
Cho dãy số nguyên A gồm n phần tử và 1 số nguyên k. Tìm trong A có phần tử nào bằng k hay không?
1.trình bày k/n con trỏ soạn thảo. phân biệt con trỏ soạn thảo vs con trỏ chuột
2.trình bày ưu, nhược điểm của vc soạn thảo = giấy bút và vc soạn thảo = máy tính
mn giúp e vs ạ