K
Khách
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ác câu hỏi dưới đây có thể giống với câu hỏi trên
T
1
20 tháng 3 2022
refer
uses crt;
var i: integer;
begin
clrscr;
for i:= 1 to 10 do
begin writeln ( ' O ' ) end;
readln
end.
VQ
20 tháng 3 2022
tham khảo
uses crt;
var i: integer;
begin
clrscr;
for i:= 1 to 10 do
begin writeln ( ' O ' ) end;
readln
end.
ML
9 tháng 5 2023
Program HOC24;
var i,n,d: integer;
a: array[1..1000] of integer;
begin
write('Nhap N: '); readln(n);
for i:=1 to n do
begin
write('Nhap so thu ',i,': '); readln(a[i]);
end;
d:=0;
for i:=1 to n do if a[i] mod 5<>0 then d:=d+1;
write('Co ',d,' so khong chia het cho 5');
readln
end.
NV
giúp với ạ tí là phải nộp rồi ạ
2
8 tháng 1 2022
Dòng 4:
sửa lại: readln(a);
Dòng 5:
sửa lại: readln(b);
Dòng 6:
Sửa lại: thêm dấu chẩm phẩy sau lệnh gán
Dòng 11: Thêm dấu chấm sau chữ end
9 tháng 11 2021
thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko
9 tháng 11 2021
mik gõ r mà mik chắc chắc 100% mật khẩu đó đúng . À mà mik lấy nick em mik vào trang của mik thì nó để là Nick đã bị đổi chủ! !
10 tháng 5 2022
uses crt;
var i,n,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n do t:=t+i;
writeln(t);
readln;
end.
HD
1
tự lm kt
:)