const fi='baitap.out'
var f1:text;
i,t:integer;
begin
assign(f1,fi); rewrite(f1);
t:=0;
for i:=1 to 20 do
t:=t+i;
writeln(f1,t);
close(f1);
end.
Cho dãy gồm N số tự nhiên a1,a2,a3...aN. viết chương trình in ra tổng các số âm,số dương của Dữ liệu vào cho bởi tệp DULIEU.INP có cấu trúc - dòng đầu tiên chứa số N - dòng thứ 2 chứa các số a1,a1,s3...aN các số cách nhau ít nhất 1 kí tự trống
Bài tập 1: Viết chương trình ghi vào đĩa 100 số tự nhiên (từ 1 đến 100).
Program GHI;
var i: integer;
f: file of integer;
Begin
Assign (f, ‘D:\11B14_2223\INTEGER.GHI');
Rewrite(f); For i:= to 100 do write(f,i);
Close(f)
End.
Bài tập 2: Mở tệp INTEGER.GHI đã có (bài tập 1) để tính tổng các số chẵn trong tệp sau đó hiển thị các tổng ra màn hình.
Bài tập 3: Mở tệp INTEGER.GHI đã có (bài tập 1) để tính trung bình cộng các số chẵn trong tệp sau đó hiển thị các tổng ra màn hình.
Bài tập 4: Mở tệp INTEGER.GHI đã có (bài tập 1) để tính kiểm tra và hiển thị ra màn hình các số tròn chục có trong tệp.
Bài tập 5: Viết chương trình ghi vào tệp SO.TXT trong thư mục 11B14_2223 ổ đĩa D các số lớn hơn 100 và nhỏ hơn 200.
Viết chương trình nhập số tự nhiên n. Trong các số tự nhiên nhỏ hơn n, tính tổng của tất cả các số chia hết cho 3.
viết chương trình nhập vào số tự nhiện n sau đó m ra tổng của n số tự nhiên có giá trị từ Min đến Max
Viết chương trình nhập vào xâu và một ký tự ch. Trả về vị trí xuất hiện đầu tiên của kí tự ch trong xâu
Cho tệp 'dayso.in' chứa các dãy số nguyên A1, A2....,An mỗi dãy sô nằm trên 1 dòng. Viết chương trình tính tổng theo dòng trong tệp 'dayso.in' sau đó ghi các số tổng này lên tệp 'tong.out', mỗi số ghi trên một dòng
1. Viết chương trình tạo tệp baitap.txt trong đó dòng đầu tiên n là số lượng các số nguyên, dòng thứ 2 là n số nguyên cách nhau 2 kí tự trắng được nhập từ bàn phím (N<=100)
2.Viết chương trình tìm số nguyên lớn nhất trong n số nguyên đã có trong tệp baitap.txt và ghi kết quả vào tệp solonnhat.txt
Mong mọi người giúp mình giải sớm =(((
Yêu cầu: Viết chương trình nhập vào số nguyên. Xóa các phần tử chia hết cho 3 của dãy và in ra dãy sau khi xóa. Sau đó lại xóa các phần tử chia hết cho 5 trong dãy còn lại và in ra dãy
Dữ liệu:
Dòng đầu tiên ghi số nguyên dương n (0<n<=105) ,
Dòng 2 ghi n số nguyên dương 64 bit cách nhau một dấu cách trống.
Kết quả:
Dòng đầu tiên ghi dãy sau khi xóa đi các phần tử chia hết cho 3,
Dòng thứ hai ghi dãy sau khi xóa hết các phần tử chia hết cho cả 3 và 5.
C++.Mong mn giúp
viết chương trình nhập một dãy số gồm N(N>=200)sau đó biểu thị tổng S của các số đầu tien trong dãy cho tới khi S>2000
viết chương trình nhập một dãy số gồm N(N>=1000)sau đó biểu thị tổng S của các số đầu tien trong dãy cho tới khi S>10000
