viết chương trình tính biểu thức x=a+b*2 và so sánh x bé hơn hay lớn hơn 10. Dùng lệnh if........then..........else......để so sánh ?
K
Khách
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.
Những câu hỏi liên quan
KV
7 tháng 4 2023
Var a,b:real;
Begin
Write('a = ');readln(a);
Write('b = ');readln(b);
If a > b then write('So lon la ',a:10:2)
Else if b > a then write('So lon la ',b:10:2)
Else write('Hai so bang nhau');
Readln;
End.
LT
22 tháng 5 2023
Program solonhon;
var a,b: integer;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a> b then write(a);
if a<b then write(b);
if a=b then write('2 so bang nhau');
readln
end.
uses crt;
var x,a,b:integer;
begin
clrscr;
write('Nhap a: ');
readln(a);
write('Nhap b: ');
readln(b);
x:=a+b*2;
if x>10 then write('X lon hon 10')
else write('X be hon 10');
readln;
end.
ở if then phải là x,'lon hon 10' chứ bạn