3.

program bai3;

uses crt;

Var a,b,c : integer;
Begin

clrscr;
Write('Nhap vao 3 so : ');Readln(a,b,c);
If a>b then
Begin
a := a + b;
b := a - b;
a := a - b;
End;
If b>c then
Begin
b := b + c;
c := b - c;
b := b - c;
End;
If a>b then
Begin
a := a + b;
b := a - b;
a := a - b;
End;
Writeln('Min = ',a);
Writeln('Max = ',c);
Readln;
End.

2.

Program vi_du;

uses crt;

var n:integer;

begin

clrscr;

write( 'nhap gia tri cua n: ' );

readln (n);

if n mod 2 = 0 then write(n , ' la so chan' )

else write (n , ' la so le' );

readln;

end.

1c

program hinhtron;

uses crt;

var r : real;

begin

clrscr;

write('nhap ban kinh ='); readln(r);

writeln('chu vi hinh tron =' ,2*pi*r :10:2);

writeln('dien tich hinh tron =' ,pi*r*r :10:2);

readln;

end.

1b

program chunhat;

uses crt;

var a,b: real;

begin

clrscr;

write('nhap canh a ='); readln(a);

write('nhap canh b ='); readln(b);

writeln('chu vi hinh chu nhat = ' ,(a+b)*2 :10:2);

writeln('dien tich hinh chu nhat =' ,a*b : 10:2);

readln;

end.

a)Hùng có số bút chì là:

10+2=12(cây)

Bình có số bút chì nhiều hơn Mai nhưng ít hơn Hùng

Gọi số bút chì của Bình là a,Ta có:

10<a<12

=>a=11

=>Bình có 11 cây bút chì

b) Cả 3 bạn có số số bút chì là:

10+11+12=33(cây)

Đáp số:a)Hùng:12 cây

Bình:11 cây

b)33 cây

a, màu vàng

b, màu đỏ

c, màu xanh lá cây

d, màu tím than.

cái này mình trả lời không biết có đúng không nữa, lâu rồi không học quên :) :) :D :D

(90:100).10=9

Tick minh nha HIEU!!!!!!!!!!!!!!

4-D

5-C

6-D

7-A

còn các câu trên mình không nhìn thấy

a) Để a là phân số thì \(n+4\ne0\Rightarrow n\ne-4\)

b) Để A là số nguyên thì n-1 chia hết cho n+4

Mà n+4 chia hết cho n+4

=> (n+4)-(n-1) chia hết cho n+4

=> 5 chia hết cho n+4

=> n+4 \(\inƯ\left(5\right)\)

=> n+4 \(\in\){-5;-1;1;5}

=> n\(\in\left\{-9;-5;-3;1\right\}\)