Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Dania sunna
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:23

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,d;

int main()

{

freopen("input.txt","r",stdin);

freopen("output.txt","w",stdout);

cin>>a>>b>>c>>d;

cout<<a+b+c+d;

return 0;

}

hậu huỳnh
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 2 2020 lúc 19:16

Bài 1:

const fi='input.txt';

fo='output.txt';

var f1,f2:text;

a,b,s:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a,b);

s:=a*b;

writeln(f2,s);

close(f1);

close(f2);

end.

Bài 2:

const fi='dulieu.txt';

fo='ketqua.txt';

var f1,f2:text;

a,b:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a,b);

if a>b then writeln(f2,a)

else if b>a then writeln(f2,b)

else writeln(f2,' khong co so lon nhat trong hai so');

close(f1);

close(f2);

end.

Khách vãng lai đã xóa
Trần Văn Tiến
Xem chi tiết
Nguyễn Lê Phước Thịnh
10 tháng 2 2022 lúc 8:41

uses crt;

const fi='input.txt'

fo='output.txt'

var f1,f2:text;

a,b:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a,b);

if (a=0) and (b=0) then writeln(f2,'Phuong trinh co vo so nghiem');

if (a<>0) then writeln(f2,-b/a:4:2);

if (a=0) and (b<>0) then writeln(f2,'Phuong trinh vo nghiem');

close(f1);

close(f2);

end.

Anh Em Song Sinh
Xem chi tiết
Nguyễn Lê Phước Thịnh
27 tháng 1 2021 lúc 22:34

const fi='input.txt'

fo='output.txt'

var st:string;

f1,f2:text;

i,d:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,st);

d:=length(st);

for i:=1 to d do 

 if st[i]<>#32 then write(f2,st[i]);

close(f1);

close(f2);

end.

Mai Linh
Xem chi tiết
Nguyễn Lê Phước Thịnh
22 tháng 4 2020 lúc 20:58

const fi='input.txt';

fo='output.txt';

var f1,f2:text;

i,n:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do

write(f2,i:4);

close(f1);

close(f2);

end.

Minh Lệ
23 tháng 4 2020 lúc 11:10

Program hotrotinhoc_hoc24;

const fi='C:\Input.txt';

fo='C:\Output.txt';

var f: text;

i,n: integer;

procedure ip;

begin

assign(f,fi);

reset(f);

read(f,n);

close(f);

end;

procedure out;

begin

assign(f,fo);

rewrite(f);

for i:=1 to n do write(f,i,' ');

close(f);

end;

begin

ip;

out;

end.

No One Actually
Xem chi tiết
No One Actually
11 tháng 4 2021 lúc 20:11

help

 

Nguyễn Lê Phước Thịnh
12 tháng 4 2021 lúc 13:04

const fi='input.txt'

fo='output.txt'

var f1,f2:text;

a,b,c,max:real;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a,b,c);

min:=a;

if min>b then min:=b;

if min>c then min:=c;

writeln(f2,min);

close(f1);

close(f2);

end.

Hoài Ân 02 Lê Huỳnh
Xem chi tiết
Exo Aeri
Xem chi tiết
Nguyễn Lê Phước Thịnh
26 tháng 1 2022 lúc 13:12

#include <bits/stdc++.h>

using namespace std;

long long a[10],b[10],i,j;

int main()

{

freopen("input.txt","r",stdin);

freopen("output.txt","w",stdout);

for (i=1; i<=10; i++) cin>>a[i];

for (j=1; j<=10; j++) cin>>b[j];

for (i=1; i<=10; i++)

cout<<a[i]+b[i]<<" ";

return 0;

}

Yến Hoang Thị Hải
Xem chi tiết