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.
-Sẵn có cái hình này lúc trước nên mình gửi trước bạn làm thử
-Link thì hơi dài, các bạn có thể gửi gmail cho mình để mình gửi qua không ạ, với lại cũng khá nhiều link, các bạn đánh hơi lâu
-Không thì mình sẽ chụp màn hình một số đề cho các bạn ôn luyện
-Năm trước thi tin học trẻ mình có 1 cái đề, thường thì nhiều đề HSG hơn, để mình tìm lại đề tin học trẻ đó rồi chụp sau nhé!
thi ban co nho lai mat khau la j , ban nho xem ban co doi mat khau ko
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ủ! !
program 06;
Uses crt;
Var
T:real
i;n:integer;
Begin
clrscr;
write('n=1');Readln(n);
T:=06
for i:=1 to n do
T:=\frac{1}{1}.2+\frac{1}{2}.5+\frac{1}{3}.8+\frac{1}{4}.11
write('T=06'; T);
readln;
end.
Lập chương trình Pascal để in bảng cửu chương ra màn hình.
Var
a:array[1..9,1..9] of Integer ;
i,j:byte ;
BEGIN
Clrscr ;
For i := 1 to 9 do
For j := 1 to 9 do
A[i,j] := i*j ;
For i := 1 to 9 do
Begin
For j := 1 to 9 do Write(a[i,j]:5);
Writeln ;
Writeln ;
End ;
Readln ;
END.
