uses crt;
var a,b:real;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
writeln(2*a/(5*(a-b)));
readln;
end.
uses crt;
var a,b:real;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
writeln(2*a/(5*(a-b)));
readln;
end.
viết chương trình nhập từ bàn phím 2 số nguyên dương a và b, đưa ra màn hình số có giá trị lớn hơn.
input: a,b
ouput: đưa ra số lớn hơn
em cần gấp, ai giúp em với
cho biết giá trị biến a sau khi đoạn trình
a:=4;
b:=5;
if a=4 then a:=5 else a:=4;
if a=5 then a:= 4 else 1:=5;
viết câu lệnh if- then cả dạng đủ và thiếu để tìm giá trị nhỏ nhất của a,b,c.
Viết câu lênh if then đưa ra màn hình 2 gián trị a và b nếu a>b thiền a:=1;b:=2
Ae chuyên tin cứu tôi với. Cảm ơn rất nhiều
1 : Viết chương trình giải phương trình bậc 2, có kiểm tra điều kiện của delta để đưa ra thông báo nghiệm phù hợp
2: Viết câu lệnh rẽ nhánh hiển thị ra màn hình thông báo giá trị của 4 biến a,b,c,d có thỏa mãn là 4 cạnh của 1 hình bình hành không ?
3: Viết câu lệnh rẽ nhánh hiển thị ra màn hình thông báo giá trị của 3 biến a,b,c có thỏa mãn là 3 cạnh của 1 hình tam giác hay không ?
Viết câu lệnh rẽ nhánh tính y= a²+b² nếu a²+b² lớn hơn học bằng 2 (a+b) nếu a²+b² nhỏ hơn 2 và a>b a+b nếu a²+b² < 2 và a nhỏ hơn hoặc bằng b Ai đó giúp em giải với ạ