Tất cảToánVật lýHóa họcSinh họcNgữ vănTiếng anhLịch sửĐịa lýTin họcCông nghệgiáo dục và đào tạo công dânTiếng anh thí điểmĐạo đứcTự nhiên cùng xóm hộiKhoa họcLịch sử và Địa lýTiếng việtKhoa học tập tự nhiênHoạt đụng đòi hỏi, hướng nghiệpHoạt rượu cồn đề nghị sáng sủa tạoÂm nhạcMỹ thuật

Bạn đang xem: Theo em có thể thực hiện một phần mềm ứng dụng mà không cần hệ điều hành được không

*

Pascal nhập xuất file:

Cho trước 2 dãy số nguim. Hãy tìm những số trực thuộc hàng thứ nhất mà ko nằm trong hàng thứ 2.

Dữ liệu nhập: Cho trong tệp tin DAYSO.INP tất cả 4 dòng:

-Dòng đầu chứa số nguyên dương M(1

*

Xem thêm: Xin Phần Mềm Đăng Tin Vfp Pro Crack Full Soure Mới Nhất, Download Vfp Pro Full Crack

const fi="dayso.inp"; fo="dayso.out";var f1,f2:text; a,b,c,d:array<1..100>of integer; m,n,i,j,dem,kt,dem1:integer;begin assign(f1,fi); reset(f1); assign(f2,fo); rewrite(f2); readln(f1,m); for i:=1 to lớn m do read(f1,a); readln(f1); readln(f1,n); for j:=1 khổng lồ n bởi read(f1,b); c<1>:=b<1>; dem:=1; for i:=1 to lớn n vì begin kt:=0; for j:=1 khổng lồ dem do if b=c then kt:=1; if kt=0 then begin inc(dem); c:=b; end; end; dem1:=0; for i:=1 lớn m vì chưng for j:=1 khổng lồ dem bởi if a=c then begin inc(dem1); d:=a; end; if dem1=0 then writeln(f2,"no solution") else begin for i:=1 to dem1 vì write(f2,d:4); end; close(f1); close(f2);over.


Đúng 0
Bình luận (0)
*

Hướng dẫn Activate Office Bản quyền sử dụng Vĩnh Viễn (Áp dụng tương tự mang lại tuy vậy loại không giống )