Bạn thử xem đúng không nha!!!
var n,i,k:longint;
f:text;
A:array[1..100000] of longint; {Bạn thay longint bằng những kiểu số nguyên khắc cũng được nhé}
begin
assign(f, 'Vd1.INP');
reset(f);
readln(f,n);
for i:=1 to n do readln(f, A[i]);
close(f);
assign(f, 'Vd2.OUT');
rewrite(f);
for k:=1 to n do if (k mod 2= 0) then
begin write(f, k); write(f, ' '); end;
close(f);
end.
Câu 7: Viết chương trình đọc file input.txt, file được bố trí như sau:
- Dòng đầu tiên ghi số nguyên n(1<n<100) là số phần tử của file
- n dòng kế tiếp, mỗi dòng là một số nguyên
ghi ra flie output.txt dãy giảm liên tiếp dài nhất.
- Dòng đầu là số phần tử của dãy
- Dòng 2 là dãy các phần tử tăng dài nhất
Câu 8: Viết chương trình đọc file input.txt, file được bố trí như sau:
- Dòng đầu tiên ghi số nguyên n(1<n<100) là số phần tử của file
- n dòng kế tiếp, mỗi dòng là một số nguyên
ghi ra flie output.txt dãy các số nguyên tố liên tiếp dài nhất liên tiếp dài nhất.
- Dòng đầu là số phần tử của dãy
Dòng 2 là dãy các phần tử tăng dài nhất
Cho tệp IN.INP, biết trong tệp chứa số nguyên bất kì M,N. Hãy lập trình đọc thông tin từ tệp IN.INP sau đó ghi những số chẵn (trong phạm vi từ M đến N ) ra OUT. INP
Viết chương trình tính tổng của n số nguyên có trong tệp Tong.inv. đưa giá trị tìm được ra tệp Tong.out. Dữ liệu vào gồm hai dòng dòng 1 ghi số nguyen dương n dòng 2 ghi n số nguyên dương dữ liệu ra một số nguyên duy nhất là tổng tìm được
Viết chương trình đọc 2 giá trị số nguyên từ file Input.txt. Tính tổng các số từ giá trị nhỏ đến giá trị lớn. Xuất vào file output.txt
cho một số nguyên dương n đọc từ tệp cau1.mp (0<n<1000) viết chương trình ghi vào tệp cau1.out tổng các số chẵn trong phạm vi từ 1 đến n
1,Viết chương trình nhập vào 3 giá trị cho số A,B,C. Ghi giá trị lên file nguồn.txt 2, Đọc giá trị từ file nguồn.txt và ghi giá trị của file (KQ.TXT) a, tính trung bỉnh cộng giá trị các phần tử b, đưa ra GTLN, GTNN của các phần tử
Một file văn bản có tên D:\DSt.txt có chứa đúng 2 dòng ,mỗi dòng chỉ chứa 1 số nguyên. Viết chương trình đọc từ tệp trên và in ra màn hình tổng và giá trị tuyệt đối hiệu hai số. Giúp e với ạ 🙆♀️
1 cho tệp văn bản B1.INP chứa các số nguyên cách nhau ít nhất 1 dấu cách . Tìm và xuất kết quả ra màn hình số lớn nhất trong 2 số nguyên liên tiếp có trong tệp
2 cho tệp văn bản B1. INP chứa các số nguyên cách nhau ít nhất dấu cách. Tính tổng và số lượng các số chia hết cho 5 . Xuất kết quả ra màn hình
3. Cho tệp văn bản B1.INP chứa các số nguyên cách nhau ít nhất 1 dấu cách tính và ghi tích 2 số nguyên liên tiếp có trong tệp KQ.B1.OUT ( mỗi tích trên 1 dòng)
