1.cho đoạn chương trình sau:
tong:=2; while tong<10 do tong:=tong+1;
sau khi thực hiện xong đoạn chương trình, biến tổng có giá trị bao nhiêu
2. cho biết giá trị của X sau khi thực hiện xong đoạn ct
X:=1; Y:=2, For i:=1 to 4 do X:=X+Y;
3. giả sử A có 5 phần tử và giá trị các phần tử là 1,3,7,8,4 . khi thực hiện câu lệnh sau T:=0; For i:=1 to 5 do T:=T+A[i]; giá trị của biến T là bao nhiêu?
1/ Sau khi chạy đoạn chương trình sau giá trị của a, b bằng bao nhiêu? a:=4 ; b:=12; If a<b then a:=a+b else Begin a:=a-b; b:=b+a end;
2/ Cho đoạn chương trình sau:a:=3 ;b:=3;c:=0 if a=b then c:=a-b+1 c:=c+1;sau khi thực hiện đoạn chương trình trên , giá trị của c là bao nhiêu?mai mình thi rồi!
Cho đoạn chương trình sau :
S:=0 ; n:=0;
While S <= 6 do
Begin
n:= n+1;
S:=S+n;
End.
Cho bt giá trị của biến S và n sau khi thực hiện đoạn chương trình trên
Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết sau khi thực hiện lệnh lặp giá trị của x và y là bao nhiêu? Và mỗi đoạn chương trình thực hiện bao nhiêu vòng lặp a Đoạn chương trình 1 b Đoạn chương trình 2: x: 0; y: 5 x:=1 ; y:= 5; For i:-5 to 2 do x:=x+2: For i:=3 to 7 do x:=x+2; y:=y+x; y:= y + x;
Bài 1: Viết chương trình pascal thực hiện các yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên n b) In ra màn hình kết quả tổng các số nguyên từ 1 đến n (sử dụng câu lệnh lặp while...do) Bài 2: Viết chương trình pascal thực hiện câc yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên dương n b) In ra màn hình kết quả tổng các số lẻ từ 1 đến n (sử dụng câu lệnh lặp while...do giúp mình với mình đang cần gấp rất gấp luôn
Câu 5: (1 điểm) Hãy cho biết kết quả sau khi thực hiện đoạn chương trình dưới đây:
s:=0; i:=1;
While i<=5 do
Begin
s:= s+1;
i:=i+1;
End;
Write(S);
Kết quả S= ………
câu 1 cho biết đoạn chương trình pascal sau đây ctrinh thực hiện bao nhiêu vòng lặp
S:=0 ; n:=0;
while S<10 do
begin
n:=n+2
S:=s+n
end
A 3 B4 C 5 D6
1.Cho đoạn chương trình sau :
S:= 0 ; n:= 0 While S <= 7 do
begin n:= n+1; S:= S+n ; end ;
a)Tính số vòng lặp.
b)Sau khi thực hiện chương trình giá trị biến S bằng bao nhiêu?
cho các đoạn chương trình sau:
a) S:=1; For i:=1 to 8 do S:=S+5
Writeln (S'='=S);
b) i:=1; S:=0 ; While S<10 do
Begin S:=S+2; i:=i+1; End;