a, (a*a*a+b)*(1+c)*(1+c)-11.

b, ((10+2)*(10+2)-24)/3+1

Lớp 3B trồng được số cây là :

        4x5=20 ( cây )

Đ/S: 20 cây

Tick đúng cho mình nha,mình đã mất công viết rồi đấy !! ^^

Program bai1;

uses crt;

var a,b,c: integer;

s: longint;

begin

clrscr;

write('nhap so nguyen 1 = '); readln(a);

write('nhap so nguyen 2 = '); readln(b);

write('nhap so nguyen 3 = '); readln(c);

s:=a+b+c;

if (s mod 3 = 0 ) and (s mod 5 = 0 ) then

writeln('tong 3 chu so a b c chia het cho 3 va 5') else

writeln('tong 3 chu so a b c khong chia het cho 3 va 5');

readln;

end.

1-A

2-C

3-D

4-C

5-A

* khác nhau:

+biến có giá trị thay đổi được trong chương trình.

+hằng có giá trị không thay đổi trong suốt quá trình thực hiện chương trình.

* cú pháp khai báo biến :

danh_sách_tên_biến : tên_kiểu_dữ_liệu;

+ trong đó Danh_sách_tên_biến là một dãy tên biến được đặt cách nhau bởi dấu phẩy.

* lệnh gán:

tên_biến := biểu_thức.

program bai1;

uses crt;

var t,v,tb: real;

begin

clrscr;

write('nhap diem toan ='); readln(t);

write('nhap diem van ='); readln(v);

tb:=(t+v) / 2;

writeln('trung binh 2 mon toan ',' van =',tb:4:2);

readln;

end.

Ta có

Với \(x\ge-2\)=>/x+2/=x+2

Khi đó ta có

x+2=10

<=>x=10-2

<=>x=8

Với x<-2

=>/x+2/=-x-2

Khi đó ta co

-x-2=10

<=>-x=10+2

<=>-x=12

<=>x=-12

Program Tong_hieu_tich_thuong;

uses crt;

var tong,hieu,tich,thuong: real;

a,b: integer;

begin

clrscr;

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

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

tong:=a+b;

hieu:=a-b;

tich:=a*b;

thuong:=a div b;

writeln('tong cua 2 so a va b =' ,tong);

writeln('hieu cua 2 so a va b =' , hieu );

writeln('tich cua 2 so a va b =',tich);

writeln('thuong cua 2 so a va b =' ,thuong);

readln;

end.

Program chu_so;

var a:integer;

begin

clrscr;

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

writeln(' chu so hang don vi la: ' , a mod 10 );

writeln(' chu so hang chuc la: ' , (a mod 100) - (a mod 10) );

writeln(' chu so hang tram la: ' , (a mod 1000) - (a mod 100) );

readln ;

end.

bạn có thể tham khảo