viết chương trình đọc từ tệp BAITAP.INP hai số nguyên a,b (a<b).
in ra màn hình tổng các số chẵn trong phạm vi từ a đến b
cho hai số nguyên a, b được đọc từ tệp baitap.inp, viết chương trình tính thương của hai số, tính tổng các số có trong khoảng từ a đến b , tính tích các số lẽ khoảng từ a đến b.
Program HOC24;
const fi='baitap.inp';
var f: text;
a,b: integer;
t: longint;
procedure ip;
begin
assign(f,fi);
reset(f);
read(f,a,b);
close(f);
end;
begin
ip;
writeln('Thuong cua 2 so la : ',a/b:1:2);
t:=0;
for i:=a to b do t:=t+i;
writeln('Tong cac so co trong khoang tu ',a,' den ',b,' la ',t);
t:=1;
for i:=a to b do if i mod 2<>0 then t:=t+i;
write('Tich cac so le trong khoang tu ',a,' den ',b,' la ',t);
readln
end.
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 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.
tệp sn.inp gồm các số nguyên dương ngăn cách nhau bởi ít nhất một dấu cách. các số nguyên là cạnh a,b của hình chữ nhật. viết chương trình đọc dữ liệu từ tệp sn.inp vào hai biến a,b. tính diện tích hình chữ nhật. ghi kết quả vào tệp cn.out
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
freopen("sn.inp","r",stdin);
freopen("cn.out","w",stdout);
cin>>a>>b;
cout<<a*b;
return 0;
}
Viết chương trình đọc vào 2 số nguyên dương từ tệp songuyen.inp tính hiệu của hai số nguyên ghi kết quả ra tệp ketqua.out
Viết chương trình đọc vào 2 số nguyên dương từ tệp songuyen.inp tính thương của hai số nguyên ghi kết quả ra tệp ketqua.out
Viết chương trình đọc vào 2 số nguyên dương từ tệp songuyen.inp tính tích của hai số nguyên ghi kết quả ra tệp ketqua.out
viết chương trình đọc dữ liệu từ tệp ví dụ chấm txt bao gồm một dãy duy nhất chứa hai số nguyên a b tìm ucln(a; b )kết quả ghi vào têp vidu.out
#include <bits/stdc++.h>
using namespace std;
unsigned long long a,b;
//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("vidu.inp","r",stdin);
freopen("vidu.out","w",stdout);
cin>>a>>b;
cout<<ucln(a,b);
return 0;
}
cho tệp X gồm có nhiều dòng, mỗi dòng có chứa 2 số nguyên a,b (a,b là số nguyên dương<=100). viết chương trình tính chu vi, diện tích hình chữ nhật với chiều dài a, chiều rộng b được đọc ra từ tệp X
uses crt;
const fi='x.inp'
var f1:text;
a,b:array[1..100]of integer;
i,n:integer;
begin
assign(f1,fi); reset(f1);
n:=0;
while not eof(f1) do
begin
n:=n+1;
readln(f1,a[n],b[n]);
end;
for i:=1 to n do
begin
writeln('Chu vi dong ',i,' la: ',(a[i]+b[i])*2);
writeln('Dien tich dong ',i,' la: ',a[i]*b[i]);
end;
close(f1);
readln;
end.