Program HOC24;
var n: integer;
t: longint;
begin
write('Nhap n: '); readln(n);
t:=1;
for i:=1 to n do t:=t*n;
write('5^',n,' = ',t);
readln
end.
Viết chương trình tính tích các số chẳn và lớn hơn 10 từ 1 đến n. Với n được nhập từ bàn phím, rồi in kết quả ra màn hình
cách 1: sử dụng lệnh for do
cách 2: sử dụng lệnh while do
Cho dãy số 2;5;8;11;... Viết Chương trình yêu cầu nhập số nguyên N từ bàn phím tính tích E sau đó in kết quả ra màn hình E=2.5.8.11....n
viết chương trình tính tổng S= 1/3 + 1/5 + 1/7+....+1/(2n+1)
In kết quả ra màn hình. Với n là số nguyên dương được nhập vào từ bàn phím
viết chương trình in ra màn hình từ 1 đến n, n là số nguyên dương nhập từ bàn phím
viết chương trình nhập n số nguyên từ bàn phím , nhập giá trị cho từng phần tử từ 1 đến N, đếm các số chẵn và tính tổng các số lẻ, hiện kết quả ra màn hình Giúp mik với ạ
Viết chương trình nhập 10 số tự nhiên bất kì từ bàn phím rồi thống kê xem chúng có bao nhiêu số chẵn, bao nhiêu số lẻ. Thực hiện in ra màn hình các số chẵn và số lẻ đó.
VD: INPUT: 5,6,9,10,20,23,7,8,13,31.
OUTPUT: + co 6 so le
+ co 4 so chan
+ cac so chan la: 6 10 20 8
+ cac so le la: 5 9 23 7 13 31
Bài 1: Viết chương trình pascal thực hiện các yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên n b) In ra màn hình kết quả tổng các số nguyên từ 1 đến n (sử dụng câu lệnh lặp while...do) Bài 2: Viết chương trình pascal thực hiện câc yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên dương n b) In ra màn hình kết quả tổng các số lẻ từ 1 đến n (sử dụng câu lệnh lặp while...do giúp mình với mình đang cần gấp rất gấp luôn
viết chương trình nhập vào 2 số tự nhiên a, b từ bàn phím và in ra màn hình hiệu 2 số đó
Giúp e vs ạ mai e thi r
