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.
1. program b1 ;
var i,n :integer ;
begin
tong:=0;
for i:= 1 to 200 do n:=n+i;
write('Tong 200 so nguyen dau tien la :',n);
readln
end.
2. program b2 ;
var i,t: integer;
begin
t:=1;
for i:= 1 to n do t:=t*i;
write('Tich 30 so nguyen dau tien la : ',t);
readln
end.
3. program b3;
var n,i : integer ;
begin
write('n='); readln(n);
n:=1;
for i:= 1 to n do n:=n*i; write('n!=',n);
readln
end.
4. program b4;
var i,n,x:integer;
lt:longint;
begin
write('nhap x='); readln(x);
write('nhap n='); readln(n);
lt:=1;
for i:=1 to n do lt:=lt*x;
write(x,'^',n,'=',lt);
readln
end.
Đoạn chương trình 1:
j=7
k=10
Đoạn chương trình 2:
j=7
k=28
a. Hợp lệ
b. Không hợp lệ (vì 3242 là số mà X là biến kiểu xâu )
c. Hợp lệ
d. Không hợp lệ (vì -3242 là số mà X là biến kiểu xâu )
Vì sao?
- Rõ ràng, cụ thể về đối tượng tìm kiếm: năng lượng gió.
- Chỉ rõ phạm vi địa lý: tại Việt Nam.
- Nhắm đúng trọng tâm: ưu và nhược điểm.
Các từ khóa còn lại vì sao không phù hợp bằng?
- "Ưu và nhược điểm của năng lượng gió hiện nay"
→ Phạm vi quá rộng, có thể bao gồm thông tin toàn cầu, không tập trung vào Việt Nam. - "Ứng dụng của năng lượng gió, năng lượng mặt trời"
→ Không nhấn mạnh đến ưu – nhược điểm, lại nói chung cả 2 loại năng lượng. - "Lợi ích cho môi trường khi dùng năng lượng tái tạo"
→ Tập trung vào lợi ích môi trường, không đề cập nhược điểm, và bao quát nhiều loại năng lượng.
Kết luận:
Hãy chọn: "Ưu, nhược điểm của năng lượng gió tại Việt Nam".
Khi nhập dữ liệu văn bản hoặc thao tác với hình ảnh, biểu tượng trên màn hình, em cần đến các thiết bị ngoại vi sau:
- Bàn phím : dùng để nhập dữ liệu văn bản.
- Chuột : dùng để chọn, di chuyển, thao tác với các hình ảnh, biểu tượng trên màn hình.
- Màn hình cảm ứng (nếu có): có thể dùng để chạm, chọn trực tiếp hình ảnh hoặc biểu tượng.
câu 1:
Var s, i: longint;
Begin
S := 0; //Thiếu dấu chấm phẩy ở đey
i := 1;
while s <= 5 do //Sửa lại điều kiện dừng vòng lặp và cộng thêm i vào s ở bên trong vòng lặp
begin
s := s + i;
i := i + 1;
end;
write('s = ', s);
end.
câu 2:
Var p, i, n: real;
Begin
Readln(n);
p := 1;
for i := 1 to n do //Sửa lại phần khai báo biến lặp và dấu bằng
begin
p := p * i / (i + 1);
end;
write('p = ', p);
end.
câu 3:
Var a: array [1..50] of longint;
n, s, i: real; //Thiếu dấu chấm phẩy ở đey
Begin
Readln(n);
For i := 1 to n do
begin
Readln(a[i]); //Sửa lại cách truy cập vào ptu của mảng
end;
S := 0;
For i := 1 to n do
begin
S := S + a[i];
end;
write('s = ', S); //Sửa lại tên biến trong write
end.