uses crt;
var a:array[1..20]of integer;
i,max:integer;
begin
clrscr;
for i:=1 to 20 do
begin
write('a[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=2 to 20 do
if max<a[i] then max:=a[i];
write(max);
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 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 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
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 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ố đó
bài 1 : Viết chương trình tính diện tích, chu vi hình chữ nhật biết độ dài các cạnh của hình chữ nhật là các số dương được nhập từ bàn phím.In ra màn hình điện tích của chu vi của nó
Bài 2: Viết chương trình tính diện tích và chu vi của hình tròn biết bán kính của hình tròn là số dương được nhập từ bàn phím.
( Help meeeeeeeee!!!!!!!!!!!!!! lưu ý, giải câu nào cx đc ạ, 2 câu thì mik càng cảm ơn ^^)
Viết chương trình nhập các số nguyên x và y, rồi in ra x,y. Sao đó hoán đổi các giá trị x và y rồi in ra màn hình
Viết chương trình nhập các số nguyên x và y, in giá trị của x và y ra màn hình. Sau đó hoán đổi các giá trị của x và y rồi in ra màn hình giá trị của x và 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
