Var a:array[1..200] of integer;
i,n:integer;
begin
write('Nhap so luong phan tu n = ');readln(n);
for i:=1 to n do
begin
write('Nhap phan tu thu ',i,' = ');readln(a[i]);
end;
writeln('Cac so chia het cho 3 la ');
for i:=1 to n do
if a[i] mod 3 = 0 then write(a[i],' ');
readln;
end.
7. Viết chương trình nhập vào một mảng các số nguyên từ bàn phím
b) In ra màn hình tổng của các số chẵn có trong mảng
Giúp với tớ cần gấp viết chương trình cho người dùng nhập vào một số nguyên dương lớn hơn 2 và đưa ra màn hình các số là ước của số nguyên đó.
Viết chương trình nhập vào điểm 2 môn Toán, Văn từ bàn phím. Điểm Anh văn được gán bằng 8.0 điểm. Sau đó tính tổng điểm, điểm trung bình cộng 3 môn học trên và đưa kết quả ra màn hình. (Điểm trung bình cộng lấy 1 số thập phân.) lẹ cho mình nha cảm mưn mn.
Nhập 3 số nguyên a,b,c tuef bàn phím. kiểm tra và in kết quả ra màn hình 3 số đó có phải là độ dài các cạnh của 1 tứ giác hay không? Giúp mik bài này và mn ơi ="""")
1.Viết chương tình nhập từ bàn phím 2 số tự nhiên a,b.Hiển thị kết quả ra màn hình tổng ,hiệu,tích,thương của hai số a và b?
2.Viết chương trình nhập vào một số tự nhiên rồi in ra kết quả trả lời số vừa hập là số chẵn hay số lẻ
3.Viết chương trình nhập hai số nguyên a và b từ bàn phím và in số đó ra màn hình theo thứ tự tăng dần
4.Viết CT nhập vào một số nguyên rồi in ra kết quả trả lời.Số vừa nhập có chia hết cho 3 không
Giups voiiiiiiiiiiiiiiiiiiiiiiiiiis!
Viết chương trình kiểm tra số nguyên dương n là số chẵn hay số lẻ. Với giá trị n được nhập từ bàn phím.
Xác định bài toán.Mô tả thuật toán.Viết chương trình giải bài toán.viết chương trình nhập từ bàn phím 2 số nguyên a và b. tính và viết ra kết quả của biểu thức 1 phần a^2 cộng 1 phần b^2 trên chương trìn pascal . ai giúp e với ah e đang cần gấp
Viết chương trình in ra màn hình kết quả phép toán : write(9x3):3 (5²-9):7+1:8 9 mod 2 8 div 3
Viết chương trình nhập vào một số nguyên N từ bàn phím và in ra màn hình tổng các số tự nhiên đầu tiên chia hết cho 5 . ( sử dụng lệnh for ... do).
