Quảng cáo
2 câu trả lời 217
Var i ,n : integer;
T : real;
Begin
write ('n=') ; read (n) ;
T:= 1;
For i:= 1 to n do
T:= T * i;
Writeln (' Tich của ' ,n,' so dau tien la' , T );
Readln;
End.
2 năm trước
Var i : integer;
S : real;
Begin
S:= 0;
For i:=1 to 10 do S:= S + 1/i;
Write (S);
Readln;
End.
bac ho vi dai
· 2 năm trước
og nghĩ og có lên top 1 kko
☯nadttg,rudde de☯
· 2 năm trước
chắc ko
ThuầnThạch
· 2 năm trước
Lên đc tóp 1 mà
Cj lên đc chị giỏi quá
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK1 44256
-
Hỏi từ APP VIETJACK24640
-
Hỏi từ APP VIETJACK21086
Thành viên hăng hái nhất
Xếp hạng tuần này
Xếp hạng tháng này
草原 (Phone 🐼)1920 điểm
Bertha🐼1210 điểm
˜”*°•.˜”*°• đănghihi(☠︎︎✞︎) •°*”˜.•°*”˜900 điểm
I love Sang in BD880 điểm
Duy Anh810 điểm
vrss755 điểm
Đứchsganh^0^520 điểm
Khả Di (phone🐼)425 điểm
Tongtai depzai 🐼395 điểm
vegeta ultra ego350 điểmCông Thắng Bùi335 điểm
G230 điểm
Danh Uy145 điểm
Angel Tanysha140 điểm
ɱʏ WĄîfu130 điểm
Bài viết mới nhất Lớp 8
-
3 năm trước5503
-
3 năm trước5176
-
3 năm trước4195
-
3 năm trước4059
-
3 năm trước3980
Gửi báo cáo thành công!
