uses crt;
const fi='data.txt'
var f1:text;
a:array[1..100]of integer;
n,i:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
n:=0;
while not eof(f1) do
begin
n:=n+1;
read(f1,a[n]);
end;
for i:=1 to n do
if a[i] mod 2=0 then write(a[i]:4);
close(f1);
readln;
end.
cho tệp chứa liên tiếp các số nguyên cách nhau bằng dấu cách và không kết thúc bằng kí tự xuống dòng. hãy viết chương trình của dãy số nguyên đó ra màn hình
Câu 1: Cho tệp HCN.TXT chứa liên tiếp các cặp số nguyên (a, b) là cạnh của các hình chữ nhật (các số cách nhau bởi dấu cách và không kết thúc bởi ký tự xuống dòng). Viết chương trình đọc các cặp cạnh a, b từ tệp HCN.TXT, tính chu vi và diện tích của các hình chữ nhật tương ứng và ghi vào tệp KETQUA.TXT.
em hãy tạo pt pascal tạo tệp songuyen.dat gồm các số nguyên viết cách nhau bởi 1 khoảng trắng và không kết thúc bằng kí tự xuống dòng em hãy tính tích các số nguyên tim số nguyên lớn nhất rồi ghi vào tệp ketqua.dat
Cho tìm input.txt tên này chứa liên tiếp các cặp số là chiều dài chiều rộng của các hình chữ nhật. a) viết công thức đọc tệp input.txt tính chu vi của các hình chữ nhật và in ra màn hình b) đồng thời ghi các chu vi xuống tệp output
cho tệp tinhtng.inp chứa
- dòng 1: 1 số nguyên dương n
- dòng 2: dây gầm n số nguyên (các số cách nhau 1 dấu cách)
yêu cầu tính tổng dây đã cho và ghi vào tệp tinhtong.out
viết chương trình tạo tệp baitap.txt trong dó dòng đầu tiên là n số lượng các số nguyên, dòng thứ hai là n số nguyên cách nhau 2 kí tự trắng được nhập từ bàn phím
cho tệp "BAITAP.TXT" chứa hai số nguyên dương a,b lần lượt là độ dài hai cạnh của một hình chữ nhật. Hãy viết chương trình đọc từ tệp trên độ dài hai cạnh, tính chu vi của hình chữ nhật và in kết quả tính được ra màn hình.
1/Học sinh làm bài trên giấy này.cho dãy số nguyên nằm trong tệp so_da_cho.txt, các số cách nhau một dấu cách. Kiểm tra các số trong dãy số đó nếu là số ngủyen tố ghi kết quả ra tệp so_nguyen_to.txt. a/trong bài toán trên ta phải khai báo bao nhiêu biến tệp b/viết lại thao tác gắn trnr tệp,mở tệp để đọc/ ghi dữ liệu,đọc ghi dữ liệu từ tệp ,đóng tệp ứng với các tệp của bài toán trên.
