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
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
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.
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.
#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;
}
#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;
}
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.
uses crt;
const fi='baitap.inp';
var f1:text;
a,b,i,t:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,a,b);
t:=0;
for i:=a to b do
if i mod 2=0 then t:=t+i;
writeln(t);
close(f1);
readln;
end.