Có thế bn viết sai đề: xuất ra các cặp số giống nhau.
Thuật toán:
procedure xuly;var i,j:integer;begin for j := 1 to n-1 do for i := j+1 to n do begin if a[i] = a[j] then begin write(a[i]); end; end;end;
uses crt;
var a:array[1..10000000] of longint;
n,i:longint;
begin
clrscr;
write('n=');readln(n);
for i:=1 to n do
write('a[',i,']=');readln(a[i]);
end;
if i mod 2=0 then writeln(a[i-1],' va ',a[i]);
readln;
end.
Kể tên 20 quốc gia rộng lớn bị xóa xổ khỏi bản đồ
Giúp mình với mình đang cần gấp lắm
Vì sao Châu Phi ít phát triển về lương thực
Vẽ anime vui vẻ nếu ai tinh mắt sẽ nhìn thấy một con số rất đẹp
Hãy kể lại 1 chuyến về quê ( ko chép mạng ) lập dàn ý và làm bài văn dài 1 tí nha !
Em hãy hãy viết một đoạn văn từ 5 đến 6 câu tả ngôi nhà mà em mơ ước trong tương lai
Cảm nhận về nhân vật ông Hai qua đoạn trích: "Ông lão náo nức bước ra khỏi phòng thông tin... cúi gằm mặt xuống mà đi
Đặt vào 2 bản tụ điện có điện dung C= 10-4/π (F) một điện áp xoay chiều thì dòng điện qua tụ có biểu thức i= 2cos (100πt+π/6 ) (A) a, tính dung khâng tụ điện và cường độ dòng điện hiệu dụng qua mạch b, viết biểu thức điện áp giữa hai bản tụ điện
Mình đang cần gấp để ôn đề cương,mình mong mọi người giúp mình làm,cám ơn ạ.
edit gacha trong hình ai nhanh, đẹp cho tlhn ưu tiên sẵn
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến