uses crt;
const fi='sont.inz';
var f1:text;
n,i,kt,j:longint;
begin
clrscr;
assign(f1,fi); rewrite(f1);
write('nhap n='); readln(n);
for i:=2 to n do
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then write(f1,i:4);
end;
close(f1);
readln;
end.
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
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
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 vào tệp solonnhat.txt
Nhập vào số thực N. (giúp mik với)
a/ in ra số nguyên lớn nhất không lớn hơn N.
b/ in ra số nguyên nhỏ nhất lớn hơn N.
Ví dụ:
|
Integer.inp |
Integer.out |
|
2.67 |
2 3 |
Mọi người giúp em giải 2 bài này được không ạ.
1. Viết chương trình nhập một mảng số nguyên 1 chiều gồm n nguyên tử. Tính tổng các phân tử chia hết cho 2 trong mảng. In kết quả ra màn hình.( biết n là số nguyên và nhập từ bàn phím)
2. Nhập một xâu từ bàn phím xóa ký tự thứ 2 và thứ 3 của xâu ghi kết quả vào tệp BT.TXT.
AI GIÚP EM NHANH VỚI Ạ CHIỀU EM THI RỒI
cho tệp SO.TXT gồm nhiều số nguyên viết chương trình đọc dữ liệu từ tệp SO.TXT và lưu vào máy nguyên A
Cho tệp DATA.TXT 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 lập trình tìm và in các số chẵn trong tệp DATA.TXT ra màn hình
Help meeeeee
1 Viết ct nhập vào dãy số a gồm n số nguyên từ bàn phím. Ghi vào tệp sn.txt
2 cho tệp dayso.inp chứa các số nguyên . Tính và in ra màn hình tổng các số nguyên trong tệp
3 Hãy cây dựng thủ tục vẽ hình chữ nhật bằng kí tự * có chiều đai a và chiều rộng b. Vận dụng vẻ 5 hình chữ nhật có độ dài bất kì từ bàn phím
Câu 1: viết chương trình nhập vào từ bàn phím số nguyên dương N và dãy A gồm N số nguyên dương A1,A2,...AN. hãy viết chương trình đếm các số lẻ trong dãy A và tính trung bình cộng của chúng. yêu cầu kết quả in lên tệp OUT.TXT
Câu 2:cho tệp dulieu.txt gồm một dòng các số nguyên mỗi số cách nhau một dấu cách. viết chương trình đọc dữ liệu từ tệp trên rồi đưa ra màn hình các số là bội của 3 và đếm xem có bao nhiêu số như vậy.
Câu 3: viết chương trình nhập vào từ bàn phím số nguyên dương N và dãy A gồm N số nguyên dương A1,A2,...AN. hãy viết chương trình đếm các số chẵn trong dãy A và tính trung bình cộng của chúng. yêu cầu kết quả in lên tệp OUT.TXT
Câu 4: cho tệp dulieu.txt gồm một dòng các số nguyên mỗi số cách nhau một dấu cách. viết chương trình đọc dữ liệu từ tệp trên rồi đưa ra màn hình các số nguyên dương và đếm xem có bao nhiêu số như vậy.
