câu1:
viết chương trình nhập 4 số nguyên bất kì từ bàn phím.Tính tổng số lớn nhất với nhỏ nhất
câu2:
viết chương trình nhập số tuổi của 1 học sinh bằng hoặc dưới 14 tuổi.Cho biết học sinh đó có trong độ tuổi học sinh cấp mấy
chú ý: học sinh cấp 1: 6 đến 10 tuổi
học sinh cấp 2: 11 đến 14 tuổi
Câu 1:
uses crt;
var a,b,c,d,min,max:integer;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
write('d='); readln(d);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
if max<d then max:=d;
min:=a;
if min>b then min:=b;
if min>c then min:=c;
if min>d then min:=d;
writeln('tong cua so lon nhat va so nho nhat la: ',max+min);
readln;
end.
Câu 2:
uses crt;
var tuoi:integer;
begin
clrscr;
write('nhap tuoi:'); readln(tuoi);
if (5<tuoi) and (tuoi<=14) then
begin
if (6<=tuoi) and (tuoi<=10) then writeln('hoc sinh cap 1');
if (11<=tuoi) and (tuoi<=14) then writeln('hoc sinh cap 2');
end
else writeln('vui long nhap lai');
readln;
end.