1) ((250 div 10) div 3) mod 2

2) (-25 <> 20) and (50 >= 10)

3) sqr(25) - 6/2

********************************

program hinh_thang;

uses crt;

var a, b, c, d : integer;

begin

clrscr;

write('nhap so dai day lon :');readln(a);

write('nhap so dai day be :');readln(b);

write('nhap so dai canh ben thu nhat  :');readln(c);

write('nhap so dai canh ben thu hai  :');readln(d);

writeln('chu vi hinh thang la :', a + b + c + d);

readln

end.

Viết chương trình tính các biểu thức:

1. [(245 div 10) div 3] mod 2           =4

2. -25 ≠ 20 AND 50 ≥ 10                => -25≠20 là đúng              50≥10 là sai

3. 25^2 – 6 : 2                                 =47

Viết chương trình tính chu vi hình thang.

var  a,b,c,d: real;

begin

writeln('Do dai canh day nho la');

readln(a);

writeln('Do dai canh day lon la');

readln(b);

writeln(' Do dai canh ben thu nhat la');

readln(c);

writeln('Do dai canh ben thu hai la');

readln(d);

writeln('Do dai duong cao la');

readln(h);

dt:=((a+b)*h)/2;

writeln('Dien tich hinh thang la');

readln;

end.