program bai1;
var a:array[1..100] of longint;
i,n:longint;
begin
{Thu tu hoc sinh duoc viet theo a[..]}
repeat write('N= ');
readln(n);
until n>0;
for i:=1 to n do
begin write('a[',i,']= ');
readln9a[i]);
end;
write('Diem cua ',n,' hoc sinh la ');
for i:=1 to n do write(a[i],' ');
readln
end.
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 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 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.
Viết chương trình tính tổng S = 1+2+3+...+1/n. Trong đó n là số nguyên được nhập từ bàn phím
Em hãy viết chương trình tính tổng các số chẵn từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
Em hãy viết chương trình tính tổng các số lẻ từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
1.Viết chương trình nhập số nguyên n. Hãy tìm chữ số lớn nhất của n.
2. Viết chương trình nhập từ bàn phím 2 số nguyên a và b. Tìm BCNN của a và b
viết chương trình tính tổng n số tự nhiên : S =1+2+3+...+ n, với n là số tự nhiên được nhập từ bàn phím ( có sử dụng khai báo biến mảng )
Viết chương trình nhập số nguyên n từ bàn phím với 2
