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.
Câu 8: B
Câu 9: A
Câu 10: A
Câu 11: B
Câu 12: C
Câu 13: B
Câu 14: D
Câu 15: A
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if (n mod i=0) and (i%2=1) then write(i:4);
readln;
end.
bạn ơi câu a của bạn ý j ạ mk giải dc hết hỏi xíu thui
ý của câu a đầu là j ??
program TICHSO;
var
n, i, j, maxVal, a_i, a_j: Integer;
begin
maxVal := 0;
Readln(n);
for i := 1 to n do
begin
Read(a_i);
if Abs(a_i) > maxVal then
maxVal := Abs(a_i);
end;
for i := 1 to n-1 do
begin
for j := i+1 to n do
begin
a_i := Abs(a[i]);
a_j := Abs(a[j]);
if (a_i * a_j) > maxVal then
maxVal := a_i * a_j;
end;
end;
Writeln(maxVal);
end.
Bài 1:
uses crt;
var a,i:integer;
begin
clrscr;
a:=0;
for i:=1 to 10 do a:=a+i;
writeln(a);
readln;
end.
xin lỗi, mình không giúp được, bạn tự làm đi nhé:)
mình đang thắc mắc là không có giám thị hay sao mà bạn chụp được hẳn cái đề thi như này cũng chịu
C++ tức là c (tiếng việt gọi là cờ thì biết rồi, tiếng anh gọi là xi hoặc xê. Ở đây ta gọi là xê đi) cộng với dống + (cộng) thì sẽ là C+ (Xê cộng). Xê công là điểm Xê có dấu cộng. Tức là khi bạn đi thi bạn đc điểm C+. Nhớ k nếu mk đúng nghen.
Câu) b
A