Tin 8

[baothi2961999]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

hãy cho biết kết qả của thuật toán sau :
bước 1 : SUM <- 0 ; i<- 0
bước 2: nếu i > 100 thì chuyển tới bước 4
bước 3: i<- i+1; SUM +i.quay lại bước 2
bước 4:thông báo giá trị SUM và kết thúc thuật toán

 

[huutoan00]

uses crt;
var SUM,i:longint;
begin
 while i<100 do
   begin
     i:=i:1;SUM:=SUM+i;
   end;
 write(SUM);
end.