program tong_n;
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
t:=0; i:=1;
while i<=n do
t:=t+i;
i:=i+1;
end;
write('Tong cac so tu 1 den ',n,' la: ',t);
readln;
end.
Sử dụng While...do
Program tinhtong;
var n,t : integer;
s : real;
write('Nhập số n');readln(n);
s:=0; t:=1;
While t <= n do
begin t:=t+1;
s:=s+1/t end ;
writeln('Tổng s là',s);
readln
Ctlhn nha
Tìm phát biểu đúng: A. Động năng tăng thì thế năng cũng tăng B. Khi động năng bằng 0 thì thế năng tăng C. Khi động năng tăng bao nhiêu lần thì thế năng giảm bấy nhiêu lần D. Khi thế năng giảm thì động năng bằng 0
cho mình hỏi (CH3-CH2-COO)2Mg và (CH3COO)2Na là muối hả mọi người
1/4 + 1/12 + 1/24 +.....+ 1/4900
cho tam giác MNP vuông tại P, có MP=6cm,PN=8cm. a.Tính MN=? b.Đường phân giác của góc PMN cắt PN tại K. Vẽ KD vuông góc với MN (D thuộc MN) Chứng minh tam giác MPD cân tại M c.So sánh PK với KN
Trình bày ý nghĩa và tác dụng của cây phát sinh giới động vật
Giải hộ em với ạ .câu nào cũng đc Hết luôn thì càng tốt Em cảm ơn
Liên hệ các vấn đề giữ gìn bảo vệ lãnh thổ, miền đảo nước ta. lm ơn giúp mik với, mai mik thi r.
(x ²+4x+10)⋮ x+3 ( cách làm dễ hiểu nhất ạ)
3. work in paris. discuss the following ideas about your dream viết ngắn thôi nhẽ cảm ơn :)))
tính a = ( 7777/8585 -77/85 +7777/16362 - 77/162) . 123498766/987661234
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến