Lập Trình Pascal: Giải Phương Trình, Bất Phương Trình Bậc Nhất

Bài Kiểm Tra © 2020 Bài Kiểm Tra.com. All Rights Reserved. logo 1
  • Trang nhất
  • Tin học
Thứ sáu, 05/07/2024, 06:59 Lập trình Pascal: giải phương trình, bất phương trình bậc nhất 2019-11-30T21:38:18+07:00 Bài 1: Viết chương trình giải phương trình bậc nhất (ax + b = 0)Bài 2: Viết chương trình giải bất phương trình bậc nhất (ax + b >= 0) giải phương trình, bất phương trình bậc nhất, lập trình pascal https://baikiemtra.com/uploads/news/2019_11/bai-tap-lap-trinh-pascal.jpg Bài Kiểm Tra Thứ sáu - 29/11/2019 22:34
  • In ra
Bài 1: Viết chương trình giải phương trình bậc nhất (ax + b = 0)Bài 2: Viết chương trình giải bất phương trình bậc nhất (ax + b >= 0) Bài 1: Viết chương trình giải phương trình bậc nhất (ax + b = 0)

Program GIAI_PHUONG_TRINH_BAC_NHAT; Var a,b,x:real; Begin Clrscr; Writeln('GIAI PHUONG TRINH BAC NHAT: AX + B=0'); Writeln('--------------------------------------'); Write ('Nhap a= '); readln(a); Write ('Nhap b= ');readln(b); If (a=0) then If (b=0) then Writeln(' Phuong trinh co vo so nghiem') Else writeln(' Phuong trinh vo nghiem') Else Writeln('Phuong trinh co nghiem x=',-b/a:4:2); Readln; End.

Bài 2: Viết chương trình giải bất phương trình bậc nhất (ax + b >= 0)

Program BAT_PHUONG_TRINH_BAC_NHAT; Uses crt; Var a,b: real; Begin Clrscr; Writeln('GIAI BAT PHUONG TRINH BAC NHAT: AX + B>=0'); Writeln('--------------------------------------'); Write('nhap a=');readln(a); Write('nhap b=');readln(b); If a<>0 then If a>0 then Writeln('Bat phuong trinh co nghiem: x>=',-b/a:4:2) Else Writeln('Bat phuong trinh co nghiem: x<=',-b/a:4:2) Else If b>=0 then Writeln('Bat phuong trinh co vo so nghiem') Else writeln('Bat phuong trinh vo nghiem'); Readln; End.

Tags: Lập trình Pascal

Ý kiến bạn đọc

Sắp xếp theo bình luận mới Sắp xếp theo bình luận cũ Sắp xếp theo số lượt thích

Theo dòng sự kiện

    /uploads/bai-kiem-tra.jpg Đề thi học kì 2 môn Sinh học lớp 11 sách Kết nối tri thức năm 2024

    /uploads/bai-kiem-tra.jpg Đề thi học kì 2 môn Sinh học lớp 11 sách Chân trời sáng tạo năm 2024

Xem tiếp...

Những tin cũ hơn

    /assets/news/2019_11/bai-tap-lap-trinh-pascal.jpg Lập trình Pascal tính chu vi và diện tích

    /uploads/bai-kiem-tra.jpg Tin học THCS Quyển 4, Bài thực hành 11. Tạo video ngắn bằng Movie Maker

GIẢI BÀI TẬP
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Bài học Bài soạn Bài giảng
Bài giới thiệu Bài hướng dẫn
Bài làm văn Bài trắc nghiệm
Kiểm tra 15P Kiểm tra 1 tiết
Kiểm tra HK1 Kiểm tra HK2
Thi vào lớp 10 Tốt nghiệp THPT
BÀI LUYỆN THI
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Kiểm tra 15 phút Kiểm tra 1 tiết
Kiểm tra học kì 1 Kiểm tra học kì 2
Luyện thi theo Bài học
Luyện thi THPT Quốc Gia
THÀNH VIÊN Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site Nhập mã do ứng dụng xác thực cung cấp Thử cách khác Nhập một trong các mã dự phòng bạn đã nhận được. Thử cách khác Đăng nhập Đăng ký © 2020 Bàikiểmtra.com. All Rights Reserved. Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây cron

Từ khóa » Giải Bất Phương Trình Ax+b 0 Bằng Pascal