uses crt;
var n,i,t:integer;
begin
clrscr;
readln(n);
for i:=2 to n do
if i mod 2=1 then write(i:4);
writeln;
t:=0;
for i:=1 to n do
if i mod 2=0 then t:=t+i;
writeln(t);
readln;
end.
Viết chương trình sử dụng biến mảng nhập n số nguyên. In ra màn hình dãy số vừa nhập:
a)Đếm số chẵn trong dãy số vừa nhập
b)Tính tổng các số trong dãy
c)Tính tổng các sô chẵn trong dãy
d)Tính trung bình cộng các số chẵn trong dãy
e)Tìm ra số lớn nhất trong dãy và in ra vị trí của số lớn nhất
f)Tìm ra số nhỏ nhất trong dãy và in ra vị trí của số nhỏ nhất
g) Tính trung bình cộng các số trong dãy
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị là số chẵn trong phạm vi từ 1 dến N, sau đó in ra màn hình.
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị là số lẻ trong phạm vi từ 1 dến N, sau đó in ra màn hình.
viết chương trình nhập vào sô nguyên n và n số nguyên từ bàn phím? in ra màn hình số lượng các số nguyên là số lẻ
: Nhập vào 01 số nguyên dương n ( nhỏ hơn 100) , sau đó , in ra từng dòng các số chẵn từ 1 đến số n, sau đó in thông báo có bao nhiêu số lẻ từ 1 đến n. (for..to..do + if..then)
Nhập vào 01 số nguyên dương m ( nhỏ hơn 100) , sau đó , in ra từng dòng các số lẻ từ 1 đến số m, sau đó in thông báo có bao nhiêu số lẻ từ 1 đến m. (for..to..do + if..then)
dientich_chuvi.pas : Nhập vào bán kính đường tròn , sau đó dùng một biến hỏi để hỏi xem nếu gõ số 1 thì sẽ tính diện tích , ngược lại sẽ tính chu vi đường tròn. (câu điều kiện)
: Viết chương trình cho phép người dùng nhập vào số năm, sau đó nhập vào lượng mưa của từng năm. Xuất ra tổng lượng mưa và lượng mưa trung bình. (for..to..do + kiểu mảng)
Câu 1: Viết chương trình nhập vào một số nguyên n. In ra màn hình tích các số từ 1 đến n.
Câu 2: Viết chương trình nhập vào một số nguyên n. In ra màn hình tích các số chẵn từ 1 đến n.
Câu 3: Viết chương trình nhập vào một số nguyên n. In ra màn hình tích các số lẻ từ 1 đến n.
Bài 6: Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện và câu lệnh lặp for to do để tính tổng các giá trị chia hết cho 2 và chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in kết quả ra màn hình.
sử dụng biến mảng viết chương trình nhập vào 1 dãy số gồm n số nguyên từ bàn phím . In ra màn hình tổng các số dương trong dãy số đó
Bài 1 : Viết chương trình Pascal nhập vào 10 số thực bất kì , in ra màn hình tổng bình phương của các số âm
Bài 2 : Viết chườn trình nhập vào số n số tự nhiên đầu tiên , tính tổng các số chẵn có trong dãy số in kết quả ra màn hình
Bài 3 : Viết chưng trình nhập vào một mảng các số nguyên bất kì , in ra màn hình các số là số dương mà là số lẻ
Giúp mk với mn ơi , mk đang cần gấp Cảm ơn mn nhiều
