viết chương trình nhập 10 số nguyên từ bàn phím in ra màn hình các số lẻ

0 bình luận về “viết chương trình nhập 10 số nguyên từ bàn phím in ra màn hình các số lẻ”

1. $#BenokM1155A$

   Trả lời: 

   Program bai1;

   uses crt;

   var tong : array [1..100] of integer;

   S, i, n : integer;

   Begin. clrscr;

   readln (n);

   for i:=1 to n do. readln (tong [i]);

   for i:=1 to n do.

   S:= S+tong[i];

   Bình luận

2. uses crt;

   var n

   ,i

   ,tong:integer;

   begin clrscr;

   write(‘nhap so nguyen n:’);

   readln(n); for i:=1 to n do if i mod 2<>0 then tong:=tong+i; write(‘tong cac so le nho hon hoac bang n la:’,tong);

   readln;

   end. * có thể thay “if i mod 2<>0” bằng “if i mod 2=1”, cách nào cũng đúng nhé bạn

   xin 5 sao

   Bình luận