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.
const fi='dulieu.inp';
fo='kq.inp';
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.
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.
Tham khảo:
import math
def giai_phuong_trinh_bac_2(a, b, c):
delta = b**2 - 4*a*c
if delta < 0:
return None
elif delta == 0:
nghiem = -b / (2*a)
return (nghiem)
else:
sqrt_delta = math.sqrt(delta)
nghiem1 = (-b + sqrt_delta) / (2*a)
nghiem2 = (-b - sqrt_delta) / (2*a)
return (nghiem1, nghiem2)
#include <bits/stdc++.h>
using namespace std;
long long i,a[100],n;
int main()
{
freopen("songuyen.txt","r",stdin);
n=20;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) cout<<a[i]<<" ";
return 0;
}
Program hotrotinhoc_hoc24;
const fi='thamso.dat';
fo='nghiem.dat';
var a,b: integer;
x: real;
procedure ip;
begin
assign(f,fi);
reset(f);
readln(f,a,b);
close(f);
end;
procedure out;
begin
assign(f,fo);
rewrite(f);
x:=0-b;
x:=x/a;
write(f,'x=',x:1:0);
close(f);
end;
begin
ip;
out;
end.
const fi='thamso.inp';
fo='kq.inp';
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
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;
if delta=0 then writeln(f2,'Nghiem cua phuong trinh la: ',-b/2*a:4:2);
if delta<0 then writeln(f2,'Phuong trinh vo nghiem');
close(f1);
close(f2);
end.