Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
TK
Các thao tác sử dụng biến:
Gán giá trị cho biến bằng lệnh gán := vd: x:=15; y:=(10+5) div 4;
Gán dữ liệu cho biến bằng lệnh nhập dữ liệu từ bàn phím Readln(tên biến);
vd: Readln(a); Readln(x,y);
Tính toán với các giá trị của biến vd: a:= (x+y)/2;
Xuất giá trị của biến bằng lệnh writeln(tên biến); vd: writeln(x); writeln(‘Chu vi = ’,a*4);
c1: while <điều kiện> do <câu lệnh>;
c3: var <tên biến>:array[<chỉ số đầu>..<chỉ số cuối>]of <kiểu dữ liệu>;
c4: for i:=1 to n do readln(a[i]);
Câu 1: B
Câu 2; A
Câu 3: C
Câu 4: C
Câu 5: A
Câu 6: D
Câu 7: B
Câu 8: D
Câu 9: A
Câu 10: D
Câu 7: – Cú pháp câu lệnh lặp với số lần biết trước (for):
for biến := giá_trị_đầu to|downto giá_trị_cuối do câu_lệnh;
while điều_kiện do câu_lệnh;
Câu 8: Viết chương trình tính tổng N số tự nhiên đầu tiên
program TongNso; var N, i, Tong: integer; begin write('Nhap N: '); readln(N); Tong := 0; for i := 1 to N do Tong := Tong + i; writeln('Tong ', N, ' so tu nhien dau tien la: ', Tong); end.
Câu 9: Sử dụng lệnh lặp While..do để tính trung bình n số thực
program TinhTrungBinh; var n, i: integer; x, Tong: real; begin write('Nhap so luong n: '); readln(n); i := 1; Tong := 0; while i <= n do begin write('Nhap so thu ', i, ': '); readln(x); Tong := Tong + x; i := i + 1; end; writeln('Trung binh la: ', Tong / n:0:2); end.
Nhập: readln(<biến>);
Câu lệnh gán: <biến>:=<điều kiện>;
Xuất: write(<nội dung xuất>);