Có 2 cách khai báo mảng:
C1: Khai báo trực tiếp
VAR <Tên biến>:array[<chỉ số đầu>,<chỉ số cuối>] of <kiểu dữ liệu>;
VD:a:array[1..50] of string;
C2:Khai báo gián tiếp
Type <Tên biến>=array[<chỉ số đầu>,<chỉ số cuối>] of <kiểu dữ liệu>;
Var <Tên mảng>:<Tên biến>;
VD:
Type mang=[1..100] of integer;
Var A:mang;
Câu 1: Trình bày cú pháp câu lệnh lặp. Giải thích ý nghĩa từng thành phần trong câu.
Câu 1: Trình bày cú pháp câu lệnh lặp. Giair thích ý nghĩa từng thành phần trong câu.
Câu 2: Tìm hiểu và trình bày ý nghĩa của các câu lệnh trong chương trình ở bài 1 và bài 2 (sgk - 60,61/sách tin lớp 8)
Nêu ý nghĩa của phần lập phương trình pascal? Giúp mik với ạ, c.ơn 😊
đoạn lệnh sau có ý nghĩa gì for i:= 1 to 5 do readln (M[i]);
a. xuất giá trị của các phần tử từ M[1] đến M[5]
b xuất giá trị của các phần tử từ M[0] đến M[5]
c. nhập giá trị của các phần tử từ M[0] đến M[5]
d. nhập giá trị của các phần tử từ M[1] đến M[5]
Giúp mình với mn ơi, mình cần gấp vào mai ạ!! Câu 1. Đoạn lệnh sau có ý nghĩa gì? For i:=1 to 5 do Readln(M[i]); * Nhập giá trị của các phần tử từ M[0] đến M[5]. Nhập giá trị cho các phần tử từ M[1] đến M[5] Xuất giá trị của các phần tử từ M[1] đến M[5]. Xuất giá trị của các phần tử từ M[0] đến M[5]. Câu 2. Đoạn lệnh nào sau đây coi là 1 câu lệnh ghép? * write(‘ a=’); readln(a); a:=5; b:=6 begin S:=S+1; i:=i+1; end; S:=S+1; i:=i+1 Đây là một câu hỏi bắt buộc Câu 3. Một mảng được khai báo như sau: Var BM: ARRAY[1..5] OF INTEGER; Các phần tử của mảng BM được đánh chỉ số * Từ 1 đến 5; Từ 0 đến 5; Từ 1 đến 6; Từ 0 đến 4; Câu 4. * Hình ảnh không có chú thích ***1 *1*1*1 *111 111* Đây là một câu hỏi bắt buộc Câu 5 * Hình ảnh không có chú thích 567 123 67 56 Đây là một câu hỏi bắt buộc Câu 6. Cú pháp nào sau đây là lệnh lặp có số lần lặp không biết trước? * Write < điều kiện> do < lệnh>; For < điều kiện> do < lệnh>; Writeln < điều kiện> do < lệnh>; While < điều kiện> do < lệnh>; Câu 7. Lệnh M[5]:=100 tương đương lệnh nào sau đây? * M[3+2]:=100. M[3]+M[2]:=100 M[3]:=100 M[2]:=100 Câu 8. Xét lệnh: While m>0 do m:=m-1; Điều kiện để lệnh m:=m-1 tiếp tục lặp là gì? * m0 m=0 Câu 9. Đặc điểm của biến đếm trong lệnh lặp For … To .. Do là gì? * Tự động tăng lên 3 đơn vị trong mỗi lần lặp; Tự động tăng lên 4 đơn vị trong mỗi lần lặp; Tự động tăng lên 1 đơn vị trong mỗi lần lặp; Tự động tăng lên 2 đơn vị trong mỗi lần lặp; Câu 10. Trong câu lệnh lặp For i:= a to b do writeln; Yêu cầu dữ liệu của a là gì? * Tùy ý Số thực Xâu ký tự Số nguyên Đây là một câu hỏi bắt buộc Câu 11. Trong câu lệnh lặp For i:= 1 to 5 do S:=S+1 thì lệnh S:=S+1 sẽ được lặp mấy lần? * 1 lần 5 lần 6 lần 4 lần. Câu 12. Cách viết lệnh lặp nào sau đây không phù hợp? * For i:= 5 to 7 do writeln; For i:= 0 to 7 do writeln; For i:= 7 to 5 do writeln; For i:= 7 to 7 do writeln; Câu 13. Xét lệnh lặp For a:=1 to 5 do s:=s+1; Giá trị của biến a trong lần lặp đầu tiên là bao nhiêu? * 2 1 0 5 Đây là một câu hỏi bắt buộc Câu 14. Với i là biến kiểu longint. Lệnh lặp nào sau đây bị sai? For i:=1 to 5 do n:=n+1; For i:=1 to 0.25 do n:=n+1; For i:=1 to 10 do Write(i); For i:=1 to 5 do write(n); Câu 15. Ý Nghĩa của câu lệnh M[3]:=5*2 là gì? * Gán giá trị cho M[3] là 5; Gán giá trị cho M[3] là 2; Gán giá trị cho M[3] là 10; Gán giá trị cho M[3] là 7;Câu 16. Lệnh lặp For i:=1,25 to 3 do writeln(‘*’); bị sai vì sao? * Vì cách viết bị thiếu. Giá trị cuối trong lệnh lặp này không phải số thực. sau từ khóa Do không có từ khóa Begin Giá trị đầu trong lệnh lặp này không phải số nguyên Đây là một câu hỏi bắt buộc Câu 17. A là một biến mảng, lệnh nào sau đây không đúng? * Readln(A[5]); Readln(A[5+1]); Read(A(5)); read(A[5]); Đây là một câu hỏi bắt buộc Câu 18. Đoạn lệnh sau có ý nghĩa gì? For i:=1 to 5 do write(M[i]); * Xuất giá trị của các phần tử từ M[1] đến M[5]. Xuất giá trị của các phần tử từ M[0] đến M[5]. Xuất giá trị của các phần tử từ M[0] đến M[4]. Xuất giá trị của các phần tử từ M[1] đến M[6]. Câu 19. Xét đoạn lệnh: For m:=1 to 3 do write(2*m); Màn hình xuất ra điều gì khi thực hiện đoạn lệnh trên? * 246 123 2*m 2*m2*m2*m Câu 20. * Hình ảnh không có chú thích 1 1000 0 100Câu 21. Khai báo: var P: Array [0..10] of integer ; Kết quả ta có mảng P với kích thước là: * 11 phần tử 12 phần tử 10 phần tử 9 phần tử Câu 22. Lệnh Write(M[3]) thực hiện việc gì? * Xuất giá trị biến M Nhập giá trị cho M. Nhập giá trị cho phần tử M[3] Xuất giá trị phần tử M[3] Câu 23. Cú pháp nào sau đây khai báo mảng gồm 500 phần tử kiểu số nguyên? * Var a: array[1..500] of String ; Var a: array[1..500] of Integer; Var a: array[1..500] of real; Var A: array[1..500] of char ; Câu 24. Trong câu lệnh lặp For i:= a to b do writeln; Yêu cầu dữ liệu của b là gì? Xâu ký tự Số thực Số nguyên Tùy ý Câu 25. Trong câu lệnh lặp For i:= a to b do writeln; Yêu cầu của a và b là gì? * a =b a>b a> =b a 0 then a:=a+1; * Điều kiện trong đoạn lệnh này là a0 Câu 33. Xem đoạn lệnh: If a>0 then a:=a+1 else a:=a*2; Vậy lệnh a:=a*2 sẽ thực hiện khi nào? * Khi a>2 Khi a lớn hơn 0 Khi a không lớn hơn 0 Khi a >1 Câu 34. * Hình ảnh không có chú thích X là số lớn nhất trong mảng a X bằng số thứ nhất trong mảng a X là số thứ 5 trong mảng a X là ố bé nhất trong mảng a Câu 35. Giả sử có đoạn lệnh khai báo biến mảng như sau: Var M: Array[0..5] of real; Kết quả ta có mảng M như sau: * gồm 6 phần tử số thực gồm 6 phần tử số nguyên gồm 5 phần tử số thực gồm 5 phần tử số nguyên
Cho 1 dãy số gồm n phần tử n<=15.Giá trị từng phần tử là số thực. Thực hiện các chương trình sau:
-Nhập từ bàn phím số phần tử và giá trị từng phần tử -Tính tổng các phần tử dương của dãy -Tính tổng và trung bình cộng của các phần tử lẻ của dãy -Tìm phần tử có giá trị lớn nhất của dãy -Tìm phần tử có giá trị nhỏ nhất -Sắp xếp dãy theo chiều tăng dần về giá trị của từng phần tử Giúp mình với ạ. Cảm ơn mọi người5.Câu lệnh Delay(x); có ý nghĩa gì ?
(0.5 Điểm)
Tạm ngừng chương trình trong vòng x giây
Tạm ngừng chương trình trong vòng x phần 10 giây
Tạm ngừng chương trình trong vòng x phần 1000 giây
Tạm ngừng chương trình trong vòng x phần 100 giây
Bài 1: Cho chương trình sau: Hãy nêu ý nghĩa từng câu lệnh trong chương trình và cho biết kết quả sau khi chạy chương trình này là gì? Hãy đặt đề bài cho bài toán này.
Program ga_cho;
Uses crt;
Var g,c: byte;
Begin
Clrscr;
For g:=1 to 36 do
For c:= 1 to 36-g do
If (g+c= 36 ) and (2*g+4*c=100) then writeln( ‘ so ga la: ‘, g,’ so cho la’,c);
Readln;
End.
Bài 2: Hãy viết chương trình tính tổng các số nguyên tố trong khoảng từ 1 đến 50
a, Xác định bài toán
b, Mô tả thuật toán
c, Viết chương trình
Giúp mik vs mik cần bài gấp trc tối nay
