Sử dụng cấu trúc là thích hợp để viết Chương trình tổng 50 số tự nhiên đầu tiên và máy tính sẽ thực hiện nhiều vòng lặp: thông báo kết quả in ra màn h

0 bình luận về “Sử dụng cấu trúc là thích hợp để viết Chương trình tổng 50 số tự nhiên đầu tiên và máy tính sẽ thực hiện nhiều vòng lặp: thông báo kết quả in ra màn h”

1. program ct;

   uses crt;

   var i:integer;

         S:longint;

   begin clrscr;

        S:=0;

      for i:=1 to 50 do

        S:=S+i;

      write(‘Tong 50 so tu nhien dau la: ‘,S);

   readln;

   end.

   Học tốt!

   Bình luận

2. Program Hotboy ;

   Uses crt;

   Var s,i : integer ;

   Begin

   Clrscr;

   S:=0; 

   For i:=1 to 50 do

   Begin

   S:=S+i;

   Inc(i);

   End;

   Writeln(‘tong cua 50 so dau tien la’,S);

   Readln

   End.

   Bình luận