program hotrotinhoc;
var tong: longint;
i,n: integer;
begin
readln(m);
tong:=0;
for i:=1 to m do
tong:=tong+(i*i);
write(tong);
readln
end.
program hotrotinhoc;
var tong: longint;
i,n: integer;
begin
readln(m);
tong:=0;
for i:=1 to m do
tong:=tong+(i*i);
write(tong);
readln
end.
Viết chương trình tính giá trị của biểu thức: D = 2(a+b)
(Với a, b là 2 số nguyên được nhập vào từ bàn phím.)
Viết chương trình nhập từ bàn phím các phần tử của mảng có độ dài là n (n được nhập từ bàn phím). Sau đó in ra phần tử có giá trị lớn nhất.
Lập trình nhập số nguyên x từ bàn phím. Tính biểu thức x+2*x
Viết chương trình tính tổng từ N-M, N và M được nhập từ bàn phím
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên A. Độ dài của dãy n cũng được nhập từ bàn phím với (0<n<=100)?
Viết thuật toán và chương trình tìm giá trị lớn nhất(in ra vị trí chứa phần tử có giá trị lớn nhất) của dãy số gồm n số nguyên được nhập từ bàn phím. (Sử dụng mảng).
Cho số thực R là bán kính của hình tròn nhập vào từ bàn phím Pi là một bằng số có giá trị 3,14.em hãy viết chương trình tính chu vi diện tích của hình tròn rồi hiển thị kết quả ra màn hình?
Viết chương trình tính tổng các dãy số nhập từ bàn phím, đến số 0 thì xuất ra kết quả các số vừa nhập
Cho x, y, z là ba biến nguyên. Cách nhập giá trị nào sau đây là sai khi muốn nhập giá trị 3, 4, 5 cho ba biến này từ bàn phím bằng câu lệnh readln(x,y,z); ?
A. Gõ 3, 4, 5 sau đó nhấn phím Enter (giữa hai số liên tiếp gõ dấu phẩy);
B. Gõ 3, 4, 5 sau đó nhấn phím Enter (giữa hai số liên tiếp gõ một dấu cách);
C. Gõ 3 sau đó nhấn phím Enter rồi gõ 4 sau đó nhấn phím Enter rồi gõ 5 sau đó nhấn phím Enter;
D. Gõ 3 sau đó nhấn phím Tab rồi gõ 4 sau đó nhấn phím Tab rồi gõ 5 sau đó nhấn phím Enter;