Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
huyokkkkk
Xem chi tiết
LÊ NGUYỄN TƯỜNG VY
10 tháng 5 lúc 20:43

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.


Phuong Duong
Xem chi tiết
Phạm Hoàng Anh
6 tháng 5 2023 lúc 9:32

lần sau bn hỏi riêng ra chứ đừng gộp như này các bn học và các thầy cô khó nhìn nha

Le Phung
Xem chi tiết
Vãn Ninh 4.0
1 tháng 5 2022 lúc 9:58

b

 

TL P
Xem chi tiết
Nguyễn Lê Phước Thịnh
28 tháng 12 2021 lúc 22:40

Cây 19: A

Câu 20: A

duy nguyễn nhất
Xem chi tiết
Vô danh
17 tháng 3 2022 lúc 10:20

8. B

9.A

hoangphuong
Xem chi tiết
Hải Vân
29 tháng 3 2022 lúc 17:13

B

Rhider
29 tháng 3 2022 lúc 17:13

B

Chanh Xanh
29 tháng 3 2022 lúc 17:14

B

Hoàn Trần
Xem chi tiết
Nguyễn Lê Phước Thịnh
5 tháng 1 2022 lúc 22:58

Chọn B

Nguyễn Ngọc Quỳnh Trang
Xem chi tiết
Nguyễn Vũ Thành Danh
Xem chi tiết
Nguyễn Lê Phước Thịnh
15 tháng 2 2022 lúc 8:08

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do t:=t+i;

write(t);

readln;

end.