Câu 1: Viết chương trình nhập số nguyên N, tính tổng các số chia hết cho 3 trong phạm vi từ 1 đến N. Câu 2: Viết chương trình nhập mảng A gồn N số n

Câu 1: Viết chương trình nhập số nguyên N, tính tổng các số chia hết cho 3 trong phạm vi từ 1 đến N.
Câu 2: Viết chương trình nhập mảng A gồn N số nguyên dương, in ra màn hình số lượng số lẻ có trong mảng A.
Câu 3: Viết chương trình:
– Nhập một xâu A từ bàn phím;
– Tạo một xâu B chỉ chứa các kí tự là các chữ cái in hoa có trong xâu A và in xâu B ra màn hình.
Câu 4: Viết chương trình nhập 1 xâu kí tự từ bàn phím. In ra màn hình số lượng chữ số có trong xâu đã nhập.

0 bình luận về “Câu 1: Viết chương trình nhập số nguyên N, tính tổng các số chia hết cho 3 trong phạm vi từ 1 đến N. Câu 2: Viết chương trình nhập mảng A gồn N số n”

  1. câu 1:

    uses crt;

    var i,tong : integer;

    begin

       clrscr;

       write(‘Nhap N: ‘);

       readln(n);

       for i := 1 to n do

         if (i mod 3 = 0) then tong := tong+i;

       writeln(‘Tong la: ‘,tong);

       readln

    end.

    Bình luận

Viết một bình luận