Giup vs ngay mai cô kt r Viet chuong trinh tinh tong S=2+4+6+8+10+–+100 Hay Viet bang 2 cach : for…do va while…do

0 bình luận về “Giup vs ngay mai cô kt r Viet chuong trinh tinh tong S=2+4+6+8+10+–+100 Hay Viet bang 2 cach : for…do va while…do”

1. ^_^

   

   Bình luận

2. For do:

   program fordo;

   uses crt;

   var i:integer;

         S:longint;

   begin clrscr;

          S:=0;

      for i:=1 to 100 do

          S:=S+i;

      write(‘Tong S la: ‘,S);

   readln;

   end.

   While do:

   program whiledo;

   uses crt;

   var i:integer;

         S:longint;

   begin clrscr;

          S:=0; i:=1;

      while i<=100 do

        begin

          S:=S+i; i:=i+1;

        end;

      write(‘Tong S la: ‘,S);

   readln;

   end.

   Học tốt!

   Bình luận