uses crt;
var a: array[1..100] of integer;
i,n,max: integer;
begin
clrscr;
write ('nhap n: '); readln (n);
for i:=1 to n do
write ('nhap a[',i,']: '); readln (a[i]);
if max<a[i] then max:=a[i];
end;
writeln ('so lon nhat la: ',max);
readln;
end.
program mang;
var A:array[1..100] of integer;
n,i,max:integer;
write('Nhap so luong phan tu: '); readln(n);
write('NHAP GIA TRI TUNG PHAN TU CUA MANG');
write('A[',i,']= ');
readln(A[i]);
max:=A[1];
if A[i]>max then maX:=A[i];
write(A[i]);
readln
Cho m gam Al vào dd H2SO4 thủ được Al2(SO4)3 và 672 ml H2 ở điều kiện tiêu chuẩn a) Viết PTHH b) Tính m ?
Vẽ pikachu or pokemon nào cx đc Full màu Line
có 5 thùng mì mỗi gói mì chuẩn nặng 65g .tìm thùng mì giả biết trọng lượng của 1 gói giả là 60g .tìm thùng mì giả dụng cụ : cân thường .không quá 1 lần cân
Tìm tọa độ tâm dg tròn ngoại tiếp ABO và tọa độ O A B
Vẽ món kem đi Ko full màu Có line Hóng
đốt cháy 1 hidrocacbon A thu được 6,72 lít CO2 và 5,4g H2O xá định công thức phân tử của A biết MA bằng 44g/mol
Vẽ anime vô tâm ( ngầu vào, nam, ng vẽ phải có tâm)
Giúp mình với ạ !!! Mình cần gấp ạ !
Vẽ chibi đg cầm một chiếc bánh Full màu Có line
vài điểm cuối cùng viết chương trình tính tổng n số tự nhiên đầu tiên
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
