Viết chương trình tính tổng 100 số lẻ tự nhiên best công nghệ giúp mk zới

0 bình luận về “Viết chương trình tính tổng 100 số lẻ tự nhiên best công nghệ giúp mk zới”

1. uses crt;
   var i,t : integer;
   begin clrscr;
   t:=0;
   for i:=1 to 100 do if i mod 2 = 1 then t:=t+i;
   write(‘tong la :’, t);
   readln
   end.

   Bình luận

2. program ct;

   uses crt;

   var s,i:integer;

   begin

   clrscr;

   s:=0;

   for i:=1 to 100 do 

   if i mod 2=1 then s:=s+i;

   writeln(‘tong la:’,s);

   readln

   end.

   Bình luận