Cho tệp cau2.inp chứa 3 số nguyên a, b, c viết chương trình đọc dữ liệu từ tệp. Tính delta và xét các trường hợp trong phương trình bậc 2 của delte, ghi kết quả vào tệp cau2.out
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.
#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;
}
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;
}
Program HOC24;
const fi='cau2.inp';
fo='cau2.out';
var dt,a,b,c: integer;
procedure ip;
begin
assign(f,fi);
reset(f);
read(f,a,b,c);
close(f);
end;
procedure out;
begin
assign(f,fo);
rewrite(f);
dt:=b*b-4*a*c;
if dt>0 then write(f,'Phuong trinh co 2 nghiem phan biet');
if dt<0 then write(f,'Phuong trinh vo nghiem');
if dt=0 then write(f,'Phuong trinh co 2 nghiem kep');
close(f);
end;
begin
ip;
out;
end.
*Cách khác:
const fi='cau2.inp';
fo='cau2.out';
var f1,f2:text;
a,b,c,delta:real;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,a,b,c);
delta:=sqr(b)-4*a*c;
if delta<0 then writeln(f2,'Phuong trinh vo nghiem');
if delta=0 then writeln(f2,'Phuong trinh co nghiem kep la: ',-b/2*a:4:2);
if delta>0 then
begin
writeln(f2,'Nghiem thu nhat la: ',(-b-sqrt(delta))/2*a:4:2);
writeln(f2,'Nghiem thu hai la: ',(-b+sqrt(delta))/2*a:4:2);
end;
close(f1);
close(f2);
end.