Diễn đàn Học tốt - HTFM
Chào mừng bạn đến với hoctot.forumvi.com - DIỄN ĐÀN HỌC TỐT
DIỄN ĐÀN HỌC TỐT thành lập với mục đích tạo một môi trường học tập để các bạn học sinh trung học  cùng nhau thảo luận, giải bài tập, tiếp thu kiến thức và học hỏi kinh nghiệm.
Rất mong các bạn tham gia và ủng hộ diễn đàn ngày càng sôi nổi hơn!
Bạn có thể  ĐĂNG NHẬP hoặc ĐĂNG KÝ TÀI KHOẢN  để tham gia học tập với chúng tôi nhé!
Xin cảm ơn!
Diễn đàn Học tốt - HTFM
Chào mừng bạn đến với hoctot.forumvi.com - DIỄN ĐÀN HỌC TỐT
DIỄN ĐÀN HỌC TỐT thành lập với mục đích tạo một môi trường học tập để các bạn học sinh trung học  cùng nhau thảo luận, giải bài tập, tiếp thu kiến thức và học hỏi kinh nghiệm.
Rất mong các bạn tham gia và ủng hộ diễn đàn ngày càng sôi nổi hơn!
Bạn có thể  ĐĂNG NHẬP hoặc ĐĂNG KÝ TÀI KHOẢN  để tham gia học tập với chúng tôi nhé!
Xin cảm ơn!
Diễn đàn Học tốt - HTFM

DIỄN ĐÀN HỌC TỐT thành lập với mục đích tạo một môi trường học tập để các bạn học sinh trung học cùng nhau thảo luận, giải bài tập, tiếp thu kiến thức và học hỏi kinh nghiệm.


You are not connected. Please login or register

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down  Thông điệp [Trang 1 trong tổng số 1 trang]

#1
 shinichi

shinichi
Thành viên năng động
Thành viên năng động
1. tính tổng từ 1 đến 50
2/tính tổng từ 1 đến N , N à số nhập từ bàn phím
 lol!lol!

#2
 HEROSTAR 2K13

HEROSTAR 2K13
Thành viên mới
Thành viên mới
1) Program tinhtong;
    Var s,n,i:integer;
    Begin
    Writeln(' nhap vao n: ');readln(n);
    s:=0;
    For i:=1 to n do
    s:=s+i;
    Writeln(' vay tong tu 1 den n la: ',s);
    readln
end.

#3
 HEROSTAR 2K13

HEROSTAR 2K13
Thành viên mới
Thành viên mới
program tinhtong1den50;
var i,tong:integer;
begin
tong:=0;
for i:=1 to 50 do 
tong:=tong+i;
writeln(' vay tong tu 1 den 50 la: ',tong);
readln
end.

#4
 Sponsored content


Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang  Thông điệp [Trang 1 trong tổng số 1 trang]


Permissions in this forum:
Bạn không có quyền trả lời bài viết