Có tính chu vi tg từ a vs h à?
Var a,h:real; 
begin
Writeln('nhap do dai duong cao: '); Readln(h);
Writeln('nhap do dai canh day: '); readln(a);
Writeln('dien tich tam giac: S= ', (a*h)/2);
end.

var a,b: integer;
begin
writeln('nhap a= '); readln(a);
writeln('nhap b= '); readln(b);
writeln('(a+b)*(a-b) = ', (a+b)*(a-b));
end.

Var a,b:integer;
           Const c =3;
           Begin
              a :=200;
              b :=a/c;
              write(b);
              readln; (ủa readln cái j)
           end.

 Var a,b :integer;     (bỏ dấu =)
           Const c =3;     (bỏ dấu :)
           Begin
              a :=200;      (thêm ;)
              b :=a/c;       
              write(b);
              readln;       (thêm ';' cơ mà read cái j)
           end.                 (thêm '.')

#include <bits/stdc++.h>

using namespace std;

int a,b;

int main()

{

cin>>a>>b;

cout<<a+b<<endl;

if (a>b) cout<<a<<" lon hon "<<b;

else cout<<b<<" lon hon "<<a;

}

1.
1) đúng zòi á
2) dư dấu ':', cú pháp: const tên hằng = giá trị;
3) tách ra 2 lệnh=> dấu phẩy thành ';'
4) đúng r
2.
1) Biến ko đc đặt tên trùng từ khóa=> begin, start sai
2) bỏ hết dấu 2 chấm ':' đi là đúng
3) ko sai
4) thêm hai dấu ' ở giá trị xâu của hằng
=> 'Tin học'

1) Gán biến x giá trị là 9
2) Gán biến x giá trị bằng của x hiện tại thêm 1 đơn vị
3) In ra màn hình từ "tong" =)))
4) Nhập giá trị biến của a từ bàn phím

var BMI: real;
begin
writeln('nhap chi so BMI: ');readln(BMI);
if (16<BMI) and (BMI<18.5) then writeln('Bạn bị thiếu cân');
if (18.5<BMI)and (BMI<25) then writeln('Bạn đủ cân');
if BMI>25 then writeln('Bạn đang thừa cân');
end.

var BMI: real;
begin
writeln('nhap chi so BMI: ');readln(BMI);
if (16<BMI) and (BMI<18.5) then writeln('Bạn bị thiếu cân');
if (18.5<BMI)and (BMI<25) then writeln('Bạn đủ cân');
if BMI>25 then writeln('Bạn đang thừa cân');
end.