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.
Đoạn chương trình 1:
j=7
k=10
Đoạn chương trình 2:
j=7
k=28
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.
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 )
a: Không hợp lệ
Sửa lại: for i:=50 downto 10 do writeln('A');
b: Không hợp lệ
Sửa lại: for i:=1 to 5 do writeln('A');
c: Không hợp lệ
x:=3;
while x<=3 do
x:=x+1;
d: Không hợp lệ
Sửa lại: x:=5;
while x<=5 do
x:=x+2;
c) Không hợp lệ vì lệnh gán phải kí hiệu là := chứ không phải =
d) Không hợp lệ vì sau từ khóa do không được phép có dấu chấm phấy ;
e) Không hợp lệ, vì không x phải khai báo số nguyên !
a) ko. vì giá trị đầu lớn hơn giá trị cuối
b) ko. vì giá trị đầu và giá trị cuối ko phải là giá trị nguyên
c) ko. vì sau biến đếm i thiếu dấu (:)
d) ko. vì sau DO có dấu (;)
e) ko. vì x ko khai báo số nguyên
a. 5x3 + 2x2 - 18x + 25 = 5*x*x*x + 2*x*x - 18*x + 25
c. \(\dfrac{2a^2+2c^2-a}{4}\)=(2*a*a+2*c*c-a)/4
d. \(\dfrac{x+y}{x-y}\)=(x+y)/(x-y)
A ko hợp lệ vì 5>1
B ko hợp lệ vì chỗ gán thiếu dấu :