a. cho 2 số nguyên a và b. Em hãy xác định số a và số b là số lớn hơn. b. cho 3 số nguyên a,b,c. Em hãy xác định số lớn nhất trong 3 số. c. Giải phương trình bậc nhất: ax+b=0

kim 06-thu Hỏi từ APP VIETJACK

· 21:02 09/11/2021

a. cho 2 số nguyên a và b. Em hãy xác định số a và số b là số lớn hơn.
b. cho 3 số nguyên a,b,c. Em hãy xác định số lớn nhất trong 3 số.
c. Giải phương trình bậc nhất: ax+b=0

Trả Lời (+5 điểm)

Lưu câu hỏi Lưu

Hỏi chi tiết

Quảng cáo

1 câu trả lời 378

Tiền Phúc Khải

4 năm trước

a. cho 2 số nguyên a và b. Em hãy xác định số a và số b là số lớn hơn.

program TienPhucKhaiVietJack;

uses crt;

var a, b : integer;

begin

write('Nhap a: ');

readln(a);

write('Nhap b: ');

readln(b);
if (a>b) then
writeln('So *** hon la so a);
if (b>a) then
writeln('So *** hon la so b);
readln
end.

b. cho 3 số nguyên a,b,c. Em hãy xác định số lớn nhất trong 3 số.

program TienPhucKhaiVietJack;

uses crt;

var a, b,c, max : integer;

begin

write('Nhap a: ');

readln(a);

write('Nhap b: ');

readln(b);
write('Nhap c: ');

readln(c);
max:= a;
if (b>max) then
writeln('So *** nhat la b')
else if (c>max) then
writeln('So *** nhat la c')
else
writeln('So *** nhat la a');
readln
end.

c. Giải phương trình bậc nhất: ax+b=0

Program TienPhucKhaiVietJack;

uses crt;

Var a,b,x:real;

Begin

Clrscr;

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 tring vo nghiem')

Else

Writeln('Phuong trinh co nghiem x=',-b/a:4:2);

Readln;

End.

...Xem thêm

3 bình luận

4 ( 5.0 )

Tiền Phúc Khải · 4 năm trước

Nếu thấy câu trả lời hữu ích thì đừng quên cho mình 1 tim và đánh giá cho mình nhé, đánh giá của bạn luôn tạo động lực cho mình ngày càng nỗ lực hơn, cảm ơn bạn ạ, chúc bạn học tốt!!!