Câu 1: cho đoạn chương trình sau: S:=0; For i:= 1 to 6 do S:=S+i; Tính giá trị của S? Câu 2: Viết chương trình tính tích của 10 số tự nhiên đầu tiên. Câu 4: Hãy tìm hiểu đoạn chương trình Pascal sau đây và cho biết với đoạn lệnh đó chương trình thực hiện bao nhiêu vòng lặp? S:=1; n:=0; While S <=10 do Begin n:=n+1; S:=S+n; End;
2 câu trả lời
1. S=21
2.
Program BTH;
uses crt;
var i,s:longint;
begin
clrscr;
For i:=1 to 10 do s:=s+i;
writeln('Tong day so tren la: ',s);
readln;
end.
4.
Câu lệnh lặp 4 lần
B1: S=21
B2:
program bt;
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
For i:=1 to 10 do t:=t+i;
writeln('Tong day so la: ',t);
readln;
end.
B3: Câu lệnh lặp 4 lần
Câu hỏi trong lớp
Xem thêm