program tinh_tong;
uses crt;
var
fin,fout:text;
S,a,b:integer;
begin
writeln('Moi nhap a = '); readln(a);
writeln('Moi nhap b = '); readln(b);
assign(fout,'KETQUA.OUT');
rewrite(fout);
S:=a+b;
write(fout,S);
close(fout);
end.
nhập từ bàn phím số nguyên dương n đưa ra kết quả tính tổng các số có 5 chữ số chia hết cho n
Chương trình nhập vào 2 số x và y với x,y là số nguyên được nhập từ bàn phím tính và xuất ra màn hình tổng hai số x,y
Viết chương trình nhập vào bàn phím mảng 1 chiều A gồm N(N<=200) phần tử nguyên .Tính và viết ra màn hình tổng các số âm có trong mảng A (chương trình sử dụng chương trình con kiểm tra số nguyên âm của số m để viết)
Viết chuong trình con: Nhập từ bàn phím 2 số nguyên a,b. Tìm BCNN(a,b) và ghi kết quả ra 1 tệp văn bản.
Mọi người giúp e với ạ. E đang cần gấp
Viết chương trình và sử dụng chương trình con đọc dữ liệu từ tệp input.txt chứa dãy số nguyên trên một dòng. Các số cách nhau một khoảng trắng
Tính tổng dãy số trong tập input.txt rồi ghi kết quả tổng này vào tập output.txt
Giúp em với ạ. Em cảm ơn
Cho tệp số nguyên Dl.txt chứa các số nguyên , mỗi số cách nhau một kí tự trắng .Viết chương trình đọc các số nguyên dương từ tệp rồi đưa ra tổng các số dương và ghi vào tệp soam.txt các số nguyên âm .
Cho tệp văn bản DLSO.TXT gồm nhiều dòng mỗi dòng chứa 2 số a,b mỗi số cách nhau 1 dấu cách. Viết chương trình tìm đọc dữ liệu từ tệp DLSO.TXT và ghi hét hết quả là giá trị nhỏ nhất của 2 số (mỗi dòng ghi 1 giá trị tương đương với 2 số ở dòng dữ liệu vào tương ứng đó được ghi vào tệp KETQUA.TXT
nhập vào từ bàn phím một dãy số nguyên(sử dụng chương trình con), tính tổng các phần tử đó, in ra màn hình( sử dụng chương trình con), sắp xếp dãy số nguyên thành dãy không giảm(sử dụng chương trình con)
Cho tệp data.txt gồm 2 dòng , dòng đầu ghi số nguyên dương m, dòng 2 ghi m số nguyên. Hãy đọc dữ liệu từ tệp
a, ghi vào tệp mới songuyen.txt các số dương từ tệp data.txt
b, đếm số lượng các số là bội của một số nguyên k cho trước biết k nhập vào từ bàn phím
