Lời giải :
program hotrotinhoc ;
var a: array[1..5] of integer ;
i,SLN : integer ;
begin
writeln('Nhap gia tri cua cac phan tu ');
for i:= 1 to 5 do
begin
write('a[',i,']='); readln(a[i]);
end;
SLN:= a[1];
for i:= 2 to 5 do
if SLN < a[i] then SLN:=a[i];
write('So lon nhat trong 5 phan tu la :',SLN);
readln
end.
Nhập từ bàn phím 1 dãy n số nguyên. Viết chương trình in ra màn hình các số lể có trong dãy.
viết chương trình nhập vào từ bàn phím 3 số nguyên bất kì.In ra màn hình trung bình cộng của 3 số đó
Viết chương trình nhập vào số nguyên dương N (1<N<10^10) từ bàn phím, Hãy sắp xếp lại các chữ số của N sao cho ta được số lớn nhất, in kết quả ra màn hình
viết chương trình pascl nhập vào ba số a, b, c và in ra màn hình tích cảu ba số đó ? ( với a b c là số nguyên bất kì được nhập từ bàn phím )
cảm ơn mọi người rất nhiều
viết chương trình sử dụng bến mảng nhập vào 1 dãy a gốm n số nguyên (n được nhập từ bàn phím). Tính tổng các số nguyên âm có trong dãy
Cho A B là hai số nguyên được nhập từ bàn phím Em hãy viết phương trình tính tổng của hai số này rồi hiển thị kết quả ra màn hình
Em hãy in ra các phần tử chẵn có trong mảng, biết số phần tử của mảng và giá trị của các phần tử của mảng được nhập từ bàn phím.
Viết chương trình nhập hai số nguyên x, y. In ra màn hình giá trị của hai số đó sau khi hoán vị.
Viết chương trình nhập ba số nguyên x, y, z. In ra màn hình giá trị của ba số đó sau khi hoán vị.
