Var a,b,x:real;
begin
write('Nhap so a = ');readln(a);
write('Nhap so b = ');readln(b);
if a = 0 then write('Khong phai phuong trinh bac nhat')
else
begin
x:=-b/a;
write('Phuong trinh co nghiem x = ',x:10:2);
end;
readln;
end.
Một số khái niệm về lập trình và ngôn ngữ lập trình
Các câu hỏi tương tự
Trong một ngôn ngữ lập trình, cú pháp dùng để:
A. Biên dịch chương trình.
B. Xác định các thao tác, ý nghĩa của thao tác.
C. Thông dịch chương trình.
D. Làm quy tắc viết chương trình.
viết chương trình nhập vào mảng A n phần tử in ra màn hình các phân tử chia hết cho 5
1/Trong các phát biểu sau phát biểu nào đúng phát biểu nào sai?
a)Chương trình dịch là thành phần chính của ngôn ngữ lập trình bậc cao
b)Nếu chương trình nguồn có lỗi cú pháp thì chương trình đích cũng có lỗi cú pháp
2/chọn biểu diễn Hằng:
a)begin b)-5+9-0 c)1024 d)-46 e)5.A8 f)(2)
Viết chương trình nhập vào từ bàn phím số nguyên dương n(n
Viết chương trình nhập vào từ bàn phím số nguyên dương n(n
Viết chương trình nhập từ bàn phím một số nguyên x hãy tính và đưa ra màn hình f(x)=x^10+x^5+1
Câu 1 : Viết chương trình tính chu vi và diện tích hình tròn với bán kính r > 0 được nhập từ bàn phím . Nếu r < 0 thì nhập lại r
Viết chương trình cho: ax mũ 3 +bx mũ 2 + c + d
bài 1:Viết chương trình nhập vào một mảng số nguyên gồm n phần tử(n<100) nhập từ bàn phím thực hiện các công việc sau:
a)In ra màn hình các phần tử của mảng vừa nhập.
b) Sắp xếp dãy số nguyên theo thứ tự tăng dần.
c) Nhập số nguyên x bất kì.Tính số chắn lớn nhất không được vượt quá x.
Tin 11
Cho K, a,b thuộc khoảng 32760 đến 32765
Gán a= 15000
Gán b= 20000
Gán K=a+b
au khi chạy chương trình sẽ cho ra kết quả như thế nào, nếu không ra được kết quả đúng thì khắc phục bằng cách nào