Viết chương trình in ra bội của 3 VCT in ra bội của 5 Mình cần gấp help me:(!!!!!

0 bình luận về “Viết chương trình in ra bội của 3 VCT in ra bội của 5 Mình cần gấp help me:(!!!!!”

1. câu 1:

   program oken;
   uses crt;
   var n,i: integer;
   begin
           clrscr;
           write(‘Nhap so luong so: ‘); readln(n);
           write(‘Boi so cua 3: ‘);
           for i:=1 to n do
                   write(i*3,’ ‘);
           readln;
   end.

   câu 2:

   program oken;
   uses crt;
   var n,i: integer;
   begin
           clrscr;
           write(‘Nhap so luong so: ‘); readln(n);
           write(‘Boi so cua 5: ‘);
           for i:=1 to n do
                   write(i*5,’ ‘);
           readln;
   end.

   Bình luận

2. Câu $1$ Program Hotboy ;

   uses crt;

   var n, i : integer;

   begin

       clrscr;

       write(‘Ban muon tim bao nhieu boi cua 3,nhap so boi can tim:  ‘); readln(n);

       for i:= 1 to n do writeln(‘boi cua 3 la’,3,’ x ‘, i, ‘ = ‘,3*i);

       Readln

   end.

   Câu $2$ Program Hotboy ;

   uses crt;

   var n, i : integer;

   begin

       clrscr;

       write(‘Ban muon tim bao nhieu boi cua 5,nhap so boi can tim: ‘); readln(n);

       for i:= 1 to n do writeln(‘boi cua 5 la’,5,’ x ‘, i, ‘ = ‘, 5*i);

       readln

   end.

   Bình luận