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.
program tim_tuoi;
uses crt;
var i,j,ngaysinh,tuoi, uoctuoi,k:integer;
begin
clrscr;
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
begin
uoctuoi:=sqr(i)+sqr(j)+sqr(k);
tuoi:=i*100+j*10+k;for ngaysinh:=1 to 31 do
if tuoi =uoctuoi+ngaysinh then write('tuoi cua cu la: ',tuoi);
end;
readln;
end.
program tim_tuoi;
uses crt;
var i,j,ngaysinh,tuoi, uoctuoi,k:integer;
begin
clrscr;
for i:=1 to 9 do
for j:=0 to 9 do
for k:=0 to 9 do
begin
uoctuoi:=sqr(i)+sqr(j)+sqr(k);
tuoi:=i*100+j*10+k;for ngaysinh:=1 to 31 do
if tuoi =uoctuoi+ngaysinh then write('tuoi cua cu la: ',tuoi);
end;
readln;
end.
giúp tôi c10 tn với c11 tl i
Câu 10 TN:
t = 8
Câu 11 TL
1) {5} {4} {2} {1} {3}
2) Chương trình trên dùng để tính tổng các số từ 1 đến n (n = 10)
3) n = 3; S = 6
có thể bằng 2, 1 và 11
bằng 1 vì 1 giọt nước cộng 1 giọt nữa thì vẫn là 1 giọt
còn bằng 11 vì 1 thêm một số 1 nữa là 11
Cũng như tôi,mấy cậu học trò mới bỡ ngỡ đứng nép bên người thân, chỉ dám đi từng bước nhẹ. Họ như con chim non nhìn quãng trời rộng muốn bay, nhưng còn ngập ngừng e sợ. Họ thèm vụng và ước ao thầm được như những người học trò cũ, biết lớp, biết thầy để khỏi phải rụt rè trong cảnh lạ.
Hc tốt:3
Program HOC24;
var i: byte;
begin
for i:=1 to 20 do writeln('Toi yeu Viet Nam');
readln
end.
var i: integer;
begin
for i:=1 to 20 do writeln('Toi yeu Viet Nam');
readln
end.
có 2 vế câu:
_C1_____
Rồi hai con mắt của cô tôi chằm chặp đưa nhìn tôi .Tôi lại im lặng cuối đầu xuống đất:lòng tôi càng thắt lại, khoé mắt tôi cay cay.
____V2____ ___C2_____V2___________C3_______V3
mối quhe tăng tiến.