![[Rest In Peace] Panzerklein](/data/avatars/m/245/245380.jpg?1410517359){kind=avatar}
Trong My Computer -> Tools -> Folder Options -> View.
Đánh dấu dòng Hide extension for ...
OK là được.
Thế có update theo lời nó k0
Thế có update theo lời nó k0
Giúp Plea với, mai có bài Kt rùi.
uses CRT;
const max=100;
var a:array[1..max] of integer;
n:integer;
procedure nhapdl;
var
i:integer;
begin
fillchar(a,0,0);
write('Nhap gia tri N: '); readln(n);
if n > max then
begin
writeln('Nhap n qua cao!');
readln;
halt;
end;
for i:= 1 to n do
begin
write('a[',i,'] = ');
readln(a[i]);
end;
end;
procedure xuatdl;
var i:integer;
begin
writeln('Cac so da nhap la:');
for i := 1 to n do
writeln('a[',i,'] = ',a[i]);
end;
procedure solonnhat;
var i,max1:integer;
begin
max1 := a[1];
for i:= 2 to n do
if a[i] > max1 then
max1 := a[i];
writeln('So lon nhat da nhap la: ',max1);
end;
function capsocong:boolean;
var i,j:integer;
begin
capsocong:=TRUE
j:= a[2]-a[1];
for i:= 2 to n do
if a[i] <> a[i-1] + j then capsocong:=FALSE;
end;
BEGIN
clrscr;
nhapdl;
xuatdl;
solonnhat;
if capsocong then
writeln('Cac so da nhap la cap so cong.')
else writeln('Cac so da nhap khong la cap so cong.');
readln;
END.
.
Tớ để trong modem là automatic, chỉ chỉnh trong win thôi. Disconnect là do ISP, gọi đến tổng đài bảo họ refresh port lại cho. Chỗ cậu không biết là số bao nhiêu, còn chỗ tớ là 119. Bị dis mà không connect lại được cứ nhằm tổng đài mà phang thôi
PS: Chỉ cần chỉnh DNS server trong 1 hoặc 2 cái thôi.
. Dis connect thì tớ ko dis nhưng mỗi lần như cúp điện , tắt nguồn (modem) là ngồi chờ ......nhanh nhất là 45 phút ::(
begin
writeln('Cac so da nhap la:');
for i := 1 to n do
writeln('a[',i,'] = ',a[i]);
end;var i,max1:integer;
begin
max1 := a[1];
for i:= 2 to n do
if a[i] > max1 then
max1 := a[i];
writeln('So lon nhat da nhap la: ',max1);
end;Nếu bạn muốn hiện kiểu này thì sửa lại như thế này là ok mà.
begin
writeln('Cac so da nhap la:');
for i := 1 to n do
write('a[',i,'] = ',a[i],' ');
end;Min thì bạn thay dấu > thành dấu < là được mà.
Nó đã được bảo vệ bởi permission là Creator thì qua máy nào format cũng vậy
Bạn để ý xem nó thông báo như thế nào. Thường là nó sẽ tự diệt, không diệt được thì nó đưa vào danh sách cách ly.
