Câu 1: với x là kiểu số nguyên, y là kiểu số thực Hãy viết phép gáng cho biến x và biến y Câu 2: Viết chương trình tính chu vi và diện tích Hình chữ

Câu 1:

*Khai báo: Var x: integer;
                        y: real;

*Phép gán: 
– x:=<giá trị cho x>;
– y:=<giá trị cho y>;
+ Ví dụ: x:=1; y:=x+2;

Câu 2:

Uses crt;
Var a, b, s, p: integer;
Begin
Clrscr;
Write(‘Nhap chieu dai a = ‘); readln(a);
Write(‘Nhap chieu rong b = ‘); readln(b);
s:=a*b;
p:=(a+b)*2;
Writeln(‘Chu vi la: ‘,p:0:2);
Writeln(‘Dien tich la: ‘,s:0:2);
Readln
End.