HOC24
Lớp học
Môn học
Chủ đề / Chương
Bài học
A. “Chính sách mới”.
B. “Chính sách kinh tế mới” (NEP).
C. “Kế hoạch Mácsan”.
D. “Láng giềng thân thiện”.
Give the correct forms of the verbs in the blankets.
My father and I (visit) _____________ Ha Long Bay this summer vacation.
a) Thuật toán 1 : Máy tính sẽ thực hiện 4 vòng lặp, j=8, T=0.
Thuật toán 2 : Máy tính sẽ thực hiện 1 vòng lặp, j=3, T=13.
b) Viết chương trình thể hiện thuật toán 1.
Program tính_toán;
Var j,T : integer;
begin
j:=0; T:=20;
While T >= 6 do
begin j:=j+2;
T:=T-j end;
Writeln ('Kết quả của j là :', j);
Writeln ('Kết quả của T là :', T);
readln
end.
Viết chương trình thể hiện thuật toán 2.
Var j,T : real;
j:=0; T:=10;
While T <= 10 do
begin j:=j+3;
T:=T+j end;
\(A=\left(\sqrt{1}+\sqrt{2}+\sqrt{3}+\sqrt{4}\right)+\left(\sqrt{5}+\sqrt{6}+\sqrt{7}+\sqrt{8}+\sqrt{9}\right)+\left(\sqrt{10}+\sqrt{11}+\sqrt{12}\right)\)
Ta có:
\(\sqrt{1}+\sqrt{2}+\sqrt{3}+\sqrt{4}>1+\sqrt{1}+\sqrt{1}+\sqrt{1}+2=5\)
\(\sqrt{5}+\sqrt{6}+\sqrt{7}+\sqrt{8}+\sqrt{9}>\sqrt{5}+\sqrt{5}+\sqrt{5}+\sqrt{5}+\sqrt{5}=5\sqrt{5}\)
\(\sqrt{10}+\sqrt{11}+\sqrt{12}>\sqrt{9}+\sqrt{9}+\sqrt{9}=9\)
=> \(A>5+5\sqrt{5}+9=14+5\sqrt{5}>12+5\sqrt{5}\)
Vậy...
Program Ai_nặng_hơn;
var a,b : real;
writeln ('Nhập cân nặng cảu bạn a :'); readln(a);
writeln ('Nhập cân nặng cảu bạn b :'); readln(b);
if a>b then writeln ('Bạn a nặng hơn bạn b')
else if a<b then writeln ('Bạn b nặng hơn bạn a')
else writeln ('Hai bạn a và b nặng bằng nhau');
Sử dụng For...do
Program tinhtong;
var n,t : integer;
s : real;
write('Nhập số n');readln(n);
s:=0;
For t:=1 to n do s:=s+1/t;
writeln('Tổng s là',s);
Sử dụng While...do
s:=0; t:=1;
While t <= n do
begin t:=t+1;
s:=s+1/t end ;
10 lần.