Câu 3: Viết chương trình tính tổng S= 
1+1/2^2+1/3^3+...+1/n^2 với n
N*cho trước (Sử dụng vòng lặp while..do)
Các bạn giúp mình được không ạ.
T:=1. For k:= 3 to 9 do T:=t*i; chuyển sang while do
Câu 22 (TH): Hãy cho biết kết quả của b trong đoạn chương trình sau đây.
a:=1; b:=5; while a>=10 do begin b:=b-a; a:=a-1; end;
A. b=5. | B. b=4. | C. b=15. | D. b=20. |
Câu 26 (NB): Hãy cho biết điều kiện trong đoạn chương trình sau đây.
a:=1; b:=5; while a>=10 do begin b:=b-a; a:=a-1; end;
A. a=1 B. a>=10 C. a>10 D. a=10
Câu 27 (NB): Hãy cho biết câu lệnh trong đoạn chương trình sau đây.
S:=1; i:=1; while S<=10 do begin i:=i+1; s:=s+i end;
A. begin i:=i+1; s:=s+i end;
B. S:=1; i:=1;
C. S<=10
D. begin i:=i+1;
giúp nốt cho mik mấy câu này vơi ạ
Cho đoạn pascal sau i:=1 x:=0 While x
Viết chương trình in ra màn hình N số nguyên. Tính tổng của các số
Var i,n,s:integer;
a:array[1..200] of integer;
Begin
Write('N = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i);readln(a[i]);
s:=s+a[i];
End;
Writeln('Cac so vua nhap la ');
For i:=1 to n do
Write(a[i]:7);
Writeln;
Write('Tong la ',s);
Readln;
End.
Viết chương trình tính tổng của n số tự nhiên bất kì được nhập từ bàn phím bằng lệnh while do với n là số nguyên được nhập từ bàn phím
program TongN;
var
n, i, tong: integer;
begin
tong := 0;
writeln('Nhap so nguyen duong N: ');
readln(n);
i := 0;
while i < n do
begin
i := i + 1;
tong := tong + i;
end;
writeln('Tong cac so tu 1 den ', n, ' la ', tong);
readln;
end.
NHẬP N IN RA TỔNG TẤT CẢ CÁC ƯỚC CỦA N BẰNG CÂU LỆNH ''WHILE DO''
Program HOC24;
var i,n,t: integer;
begin
write('Nhap N: '); readln(n);
i:=1; t:=0;
while i<=n do
begin
if n mod i=0 then t:=t+i;
i:=i+1;
end;
write('Tong cac uoc cua ',n,' la: ',t);
readln
end.
Viết CT nhập vào 1 số nguyên dương n, rồi xuất ra màn hình : +tổng các số chẵn từ 1 đến n + Số các số chẵn từ 1 đến n
Cho biết hoạt động của câu lệnh lặp với số lần chưa biết trước
TK:
Câu lệnh lặp với số lần biết trước :
– Chỉ thị cho máy tính thực hiện 1 lệnh hay 1 nhóm lệnh với số lần đã được xác định từ trước.
– Điều kiện là 1 giá trị của 1 biến đếm có giá trị nguyên
Câu lệnh lặp với số lần chưa biết trước :
– Chỉ thị cho máy tính thực hiện 1 lệnh hay 1 nhóm lệnh với số lần lặp chưa biết trước.
– Điều kiện tổng quát hơn, có thể là kiểm tra của 1 giá trị có thực, cũng có thể là 1 điều kiện tổng quát khác.
Đoạn chương trình trên thực hiện bao nhiêu vòng lặp?
n:=10;T:=100
While n>10 do n:=n+5;T=T-n;
Đoạn chương trình trên thực hiện bao nhiêu vòng lặp?
n:=10;T:=100
While n>10 do n:=n+5;T=T-n;
->đề sai rùi bạn n:=10
10=10 không có 10>10
