Question

1.viết chương trình nhập 3 số a,b,c từ bà phím.In ra màn hình giá trị số lớn nhất

2. cho 2 biến x,y hãy mô tả thuật toán hoán hổi giá trị biến nói trên,giá trị tăng dần

Answer 1

1.

program timgtln;

uses crt;

var a,b,c: real;

Max: real;

begin

clrscr;

write('Nhap a vao day '), readln(a);

write('Nhap b vao day '), readln(b);

write('Nhap c vao day '), readln(c);

Max:= a;

if Max < b then Max:=b;

if Max < c then Max:=c;

writeln('So lon nhat la',Max);

readln

end.

Answer 2

Này mới đúng nha bạn

program timgtln;

uses crt;

var a,b,c: real;

Max: real;

begin

clrscr;

write('Nhap a vao day '); readln(a);

write('Nhap b vao day '); readln(b);

write('Nhap c vao day '); readln(c);

Max:= a;

if Max < b then Max:=b;

if Max < c then Max:=c;

writeln('So lon nhat la',Max);

readln

end.