hộ với viết chương trình tính h = 1+1\3+1\5+....+1\n để h lớn nhất = 2,5
2 câu trả lời
program oken;
uses crt;
var h:real;
i,n:longint;
begin
clrscr;
write('nhap n');
h:=1; i:=0;
while h<=(5/2) do
begin
i:=i+1;
h:=h+(i/(i+2));
end;
writeln('h=',h);
readln;
end.
Program Hotboy ;
Uses crt;
Var s,i : real;
Begin
Writeln('moi ban nhap n'); readln(n);
Repeat
H:=0;
H=H+1/i :
I:=i+2 ;
Writeln('tong la',h);
Until h>=2,5;
Readln
End.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
