Program HOC24;
var i,n,x: integer
fx,f: longint;
begin
write('Nhap x: '); readln(x);
fx:=1;
for i:=1 to 10 do
begin
fx:=fx*x;
if i=5 then f:=fx;
end;
fx:=fx+f+1;
write('f(',x,')=',fx);
readln
end.
bài 1:Viết chương trình nhập vào một mảng số nguyên gồm n phần tử(n<100) nhập từ bàn phím thực hiện các công việc sau:
a)In ra màn hình các phần tử của mảng vừa nhập.
b) Sắp xếp dãy số nguyên theo thứ tự tăng dần.
c) Nhập số nguyên x bất kì.Tính số chắn lớn nhất không được vượt quá x.
Viết chương trình nhập vào từ bàn phím số nguyên dương n(n
Viết chương trình nhập vào từ bàn phím số nguyên dương n(n
Nhập điểm trung bình (dtb) của một học sinh từ bàn phím, sau đó in ra màn hình xếp loại của học sinh này.
• Nếu 8⩽dtb⩽10: Xếp loại Giỏi
• Nếu 6.5⩽dtb<8: Xếp loại Khá
• Nếu 5⩽dtb<6.5: Xếp loại Trung bình
• Nếu 0⩽dtb<5: Xếp loại Yếu
viết chương trình nhập vào mảng A n phần tử in ra màn hình các phân tử chia hết cho 5
Viết chương trình nhập một xâu từ bàn phím
a, đưa ra màn hình độ dài của xâu
b, đưa ra màn hình xâu theo thứ tự đảo ngược
Nhập 1 số từ bàn phím. Nhiều nhất 6 chữ số. In ra cách đọc số đó. Ví dụ 12=> mười hai, 123=> một trăm hai mươi ba. 1456=> một ngàn bốn trăm năm mươi sáu
Anh nào giúp em với ạ
Câu 1: anh(chị) hãy nhập vào một mảng gồm cso n số bất kì, sau đó in ra màn hình mảng đó.
Câu 2: in ra những số chẵn, lẻ, chia hết cho 3
Câu 3: in ra những số ở vị trí chẵn, lẻ
Viết chương trình nhập một mảng số nguyên gồm n phần tử,thực hiện các công việc sau:
a.Tính tổng các phần tử của mảng
b.Đếm các phần tử âm có mặt trong mảng
c.Tính tổng phần tử nhỏ nhất và lớn nhất trong mảng
d.CHỉ ra vị trí các số nguyên tố có mặt trong mảng
e.Nhập một số nguyên X bất kỳ từ bàn phím (X>0_,so sánh X và số lương số nguyên dương trong mảng?
f.Xóa X phần tử liên tiếp trong mảng và bắt đầu từ vị trí thứ X.In mảng sau khi xóa ra màn hình
