Viết chương trình giải phương trình bậc 2 ax bình +bx+c bằng 0(a khác o) đọc các biến a,b,c từ tệp "dulieu.inp" và nghiệm phương trình đưa ra tệp "kq.inp"

thanduong

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 35 xem

1 trả lời

Thích Trả lời

ntran2690

Xem Hinh

Vote (0) Phản hồi (0) 2 năm trước

0941771583

var f1, f2: text;
    a, b, c, d: real;
begin
assign(f1, 'dulieu.inp'); reset(f1);
assign(f2, 'kq.inp'); rewrite(f2);
read(f1, a, b, c);
d:=sqr(b)-4*a*c;
if d<0 then write(f2, 'vo nghiem')
else if d=0 then
     write(f2, 'nghiem: ', -b/(2*a))
else
    begin
        write(f2, 'nghiem 1: ');
        writeln(f2,(-b-sqrt(d))/(2*a));
        write(f2, 'nghiem 2: ');
        writeln(f2,(-b+sqrt(d))/(2*a));
    end;
close(f2); close(f1)
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Kể tên bài thơ có cùng tác giả cùng thể thơ với bài thơ Tức cảnh Pác Bó của Hồ Chí Minh

một bể nước dạng hình hộp chữ nhật có chiều dài 20dm,chiều rộng 120 cm,chiều cao 8 dm.a) Tính thể tích bể nước đó.b) nếu trong bể có sẵn 120 lít nước thì hỏi phải mở đồng thời vòi 1 và vòi 2 trong mấy giờ thì nước đầy bể.(vòi một 18 lít/phút;vòi hai 27 lít/phút)

bạn nào thi xong lịch sử rồi có thể cho mik xin đề cương ôn tập đc ko ạ

Một hình vuông có chu vi là 880cm.tính cạnh hình vuông đó?

Làm giúp mình bài tập tự luận 3đ vs

Giúp em với vì máy tính ko chụp đc nên phải làm thế, mong giúp ạ!

Viết văn anh về bộ phim yêu thích khoảng 140 từ ( ko chép ở trang khác)

Bạn nào có đề thi giữ kì 2 môn sinh học ko??Giúp mình vs Nếu là đề của Phòng giáo dục và đào tạo huyện Đông Hưng thì càng tốt nha

Làm hộ em câu 1,2,3,4 phần đọc-hiểu ạ 0 cần làm phần tập làm văn

Trình bày phưowng pháp hóa học phân biệt: ankin-1, anken, ankan

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến