*Mình không thấy biến n trong đoạn chương trình, giá trị của i mới đúng chứ?
- Đoạn chương trình thực hiện 4 vòng lặp
- Khi kết thúc giá trị của S là 12
- Khi kết thúc giá trị của i là 8
ĐỀ CƯƠNG ÔN TẬP TIN HỌC 8
I-Câu lệnh lặp
Câu 1: Nêu cấu trúc và hoạt động của câu lệnh lặp biết trước For...do
Câu 2: Tìm giá trị của S trong đoạn chương trình sau:
S:=0
For i:= 1 to 5 do S:= S+i;
Câu 3: Sau khi thực hiện chương trình sau giá trị S bằng bao nhiêu?
S:=0
For i:= 1 to 5 do
S:= S*i;
Câu 4: Viết chương trình tính tổng n số nguyên được nhập từ bàn phím
II-Lặp với số lần chưa biết trước
Câu 5: Nêu cấu trúc và hoạt động của câu lệnh lặp chưa biết trước While...do
Câu 6: Cho biết kết quả đoạn chương trình sau:
a:=10;
While a>=10 do write(a);
Câu 7: Khi thực hiện chương trình sau câu lệnh "xin chao" được in ra màn hình mấy lần?
n:=1;
whlie n<=10 do
begin
n:=n+1;
writeln('xin chao');
end;
III-Làm việc với dãy số
Câu 8: Dữ liệu kiểu mãng là gì?
Câu 9: Nêu cú pháp và các thành phần của khai báo biến mảng
Câu 10: Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của 1 dãy. Độ dài của dãy cũng được nhập từ bàn phím
Câu 11: Viết chương trình nhập n số nguyên từ bàn phím và in ra số lớn nhất trong dãy, n cũng được nhập từ bàn phím
Câu 1: Cho đoạn chương trình:
S:=0;
For i:=1 to 5 do S:=S+1;
a) Cho biết giá trị của S
b) Đoạn chương trình trên thực hiện bao nhiêu lần lặp
Câu 2:
Viết chương trình bằng ngôn ngữ lập trình pascal thực hiện công việc nhập 20 phần tử có giá trị nguyên cho mảng B(1 chiều, nhập từ bàn phím)
a) Tính tổng các phần tử có giá trị dương trong mảng
b) Tính tổng các phần tử có giá trị lẻ trong mảng
*Giúp mình nha, sắp thi rùi
1.
a, Cho đoạn chương trình sau:
x:=0;
For j:=1 To 6 Do x:=x+j;
Hãy chuyển sang lệnh WHILE...DO viết thành chương trình hoàn chỉnh và cho biết giá trị x bằng bao nhiêu?
b. Cho đoạn chương trình sau:
x:=0; j:=0;
While j<= 6 Do begin x:=x+j;j:=j + 1; end;
Hãy chuyển sang lệnh FOR...TO...DO, viết thành chương trình hoàn chỉnh và cho biết giá trị x là bao nhiêu?
1/ Các câu lệnh trên có hợp lệ không , nếu chưa hợp lệ thì hãy sửa lại cho đúng ?
a/ For i:=1,5 to 10.5 do s:=s+i;
b/ Var X : array [100..1] of integer;
c/ X:=1 ; while X:=10 do X:=X+5;
d/For i:=1 to n do begin s:=s+i ; i:=i-1;
2/Hãy viết các câu lệnh , khai báo theo yêu cầu sau :
a/ Khai báo mảng X gồm 50 phần tử thuộc kiểu dữ liệu số nguyên
b/ Phần tử thứ 9 của mảng A được gán bằng 5
c/Khai báo mảng diemtin gồm 100 phần tử thuộc kiểu dữ liệu số thực
d/ Nhập giá trị phần tử thứ 5 trong mảng diemtin
Giúp mình với , mai mình thi r ~~~
Giá trị của các chỉ sô trong câu lệnh
Các từ khóa trong câu lệnh for ... do ,while ... do.
câu lệnh while ... do thực hiện tối bao nhiêu lần?
câu lệnh for ... do thực hiện tối thiểu bao nhiêu lần?
Cách khai báo sau đây là đúng hay sai? Nếu sai hãy sửa lại:
Var x:array [10,13] of integer;
S:=0; n:=0; while S < for do n:=n + 1; S:= s+n
For i:=1 to 10 do; writeln ('A')
Var x: real; begin for x:=1 to 10 do writeln ('A'); end.
cho thuật toán sau:
b1: nhập n
b2: s<- 0 i<- 0
b3: i <- i+1
b4: nếu i nhỏ hơn hoặc bằng n ,S <- S+i và quay lại b3 ngược lại (i > n) thông báo kết quả và kết thúc thuật toán
hãy viết chương trình Pascal để thể hiện thuật toán trên mn giúp e với mai em thi hk2
Câu 1: hãy tìm hiểu đoạn chương trình sau đây. Sau khi đoạn chương trình này được thực hiện, giá trị của y bằng bao nhiêu?
X:=0;Y:=7;
While X<Y do X:=X+2;Y:=Y+1
Em hãy sắp xếp các câu lệnh sau và viết lại thành 1 chương trình hoàn chỉnh . Sau đó cho biết chương trình đó thực hiện công việc gì ? Writeln ( ' Tong cac phan tu le trong mang la : ' , tle ) ;
End.
Program Bai _ tap _ day _ so ;
If a [ i ] mod 2 = 0 then chan : = tchan + a [ i ] Readln ;
a:array [ 1 . . 100 ] of Integer ;
Begin
Clrscr ;
write ( ' Nhap so phan tu cua mang : ' ) ; Readln ( n ) ;
For i : = 1 to n do readln ( a [ i ] ) ;
For i : = 1 to n do
Write ( ' Nhap phan thu thu ' i ) ;
Writeln ( ' Tong cac phan tu chan trong mang la : ' , tchan ) ;
Begin
End ;
tchan : = 0 ; tle : = 0 ;
Else tle : = tle + a [ i ] ;
Uses crt ;
Var i , n , tchan , tle : Integer ;
