Câu 5: $c=13$

Câu 6: Cú pháp lệnh gán dữ liệu: <Tên biến>:=>Biểu thức cần gán giá trị cho biến>;

Câu 7: a*x*x+b*x+c

Câu 8: $X=7$ vì 45 mod 3 = 0 là đúng.

Câu 9: $x=9$ vì $x>5$ là đúng nên $x=x+1=8+1=9$

Câu 10: 

15 - 8 > 7: False

7*6+9<50: False

Sqr(9)/3<20:  False

Sqr(20-15)=25: True

Câu 11:

uses crt;
var a,h,S:real;
begin
   clrscr;
   write('Nhap a, h: '); readln(a,h);
   S:=(a*h)/2;
   write('Dien tich tam giac la: ',S:4:2);
   readln
end.

Câu 12:

uses crt;
var a,b,c:real;
begin
   clrscr;
   write('Nhap chieu dai 3 canh tam giac: '); readln(a,b,c);
   if (a+b>c) or (a+c>b) or (b+c>a) then 
   write('Day la 3 canh cua 1 tam giac') else
   write('Day khong la 3 canh cua 1 tam giac');
end.

Câu 13:

uses crt;
var n:integer;
begin
   clrscr;
   write('Nhap n: '); readln(n);
   if n mod 2 = 0 then write(n, ' la so chan')
   else write(n,' la so le');
   readln
end.