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
giúp mk vs ạ mai mk thi r
Cho tệp so.txt có giá trị sau: 3 4 5 9 10 -5 9. Em hãy viết chương trình đọc tệp so.txt sau đó thực hiện các yêu cầu sau rồi ghi vào tệp kq.txt
- Tính tổng các số chẵn
- Tính tổng các số lẻ
- Tính tổng các số chia hết cho 3
cho tệp so.txt gồm các số nguyên viết chương trình đọc dữ liệu từ tệp so.txt và in ra màn hình các số chẵn
uses crt;
const fi='so.txt';
var f1:text;
a:array[1..100]of integer;
i,n: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],' ');
close(f1);
readln;
end.
*Viết chương trình ghi hai số 5 và 15 vào tệp so.txt:
const f='so.txt'
var f1:text;
begin
assign(f1,f); rewrite(f1);
writeln(f1,'5 15');
close(f1);
end.
*Viết chương trình tính tổng, hiệu, tích, thương của x,y và in kết quả ra màn hình:
uses crt;
const fi='so.txt'
var x,y:integer;
f1:text;
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,x,y);
writeln('Tong la: ',x+y);
writeln('Hieu la: ',x-y);
writeln('Tich la: ',x*y);
writeln('Thuong la: ',x/y:4:2);
close(f1);
readln;
end.
viết chương trình đọc dữ liệu tệp SO.TXT sau đó ghi tệp "ketqua.TXT,rồi in ra màn hình
Viết chương trình đọc dữ liệu từ tệp input.pas (tệp có chứa 2 số nguyên cách nhau bởi dấu cách) và ghi vào tệp output.pas tích của hai số nguyên vừa đọc từ tệp input.pas
Program HOC24;
var f1,f2: text;
a,b: integer;
t: longint;
begin
assign(f1,'input.pas');
reset(f1);
assign(f2,'output.pas');
rewrite(f2);
readln(f1,a,b);
t:=a*b;
write(f2,t);
close(f1);
close(f2);
End.
Cho tệp SN3.INP chứa n số nguyên dương (mỗi số cách nhau một dấu cách trên một dòng). Viết chương trình đọc dữ liệu từ tệp đã cho Tính ƯCLN dãy các số nguyên dương đó và lưu kết quả vào tệp UC.OUT .
#include <bits/stdc++.h>
using namespace std;
unsigned long long a[1000],i,n,uc;
//chuongtrinhcon
unsigned long long ucln(long long a,long long b)
{
if (b==0) return(a);
else return(ucln(b,a%b));
}
//chuongtrinhchinh
int main()
{
freopen("sn3.inp","r",stdin);
freopen("uc.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
uc=ucln(a[1],a[2]);
for (i=3; i<=n; i++)
uc=ucln(uc,a[i]);
cout<<uc;
return 0;
}
Cho tệp INPUT.INP có chứa 2 số nguyên a và b. Viết chương trình đọc dữ liệu từ tệp INPUT.INP và ghi vào tệp OUTPUT.OUT số nhỏ nhất của 2 số nguyên này
const fi='input.inp'
fo='output.out'
var a,b:integer;
f1,f2:text;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,a,b);
if a<b then writeln(f2,a)
else writeln(f2,b);
close(f1);
close(f2);
end.
Cho tệp dulieuvao.txt gồm nhiều dòng, mỗi dòng chứa 2 số nguyên a, b. Các số cách nhau bởi dấu cách. Viết chương trình đọc dữ liệu từ tệp, tính trung bình cộng và ghi kết quả ra tệp dulieura
Cho tệp input.txt gồm nhiều dòng.Mỗi dòng là một mảng 6 số nguyên. Viết chương trình đọc dữ liệu từ tệp input.txt.Tính tổng các phân tử là bội của 2 và 3 .Kết quả xuất ra tệp output.txt