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ữ nhật chiều dài và chiều rộng được nhập vào từ bàn phím
M.n giúp e vs ????????
Mai e thi rồi ????
Tất cả nhờ m.n giúp e nhá ????
Cảm ơn mọi người trc ạ
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.
Câu lệnh gán giá trị cho biến
Var ds biến : kiểu dữ liệu
*Chú ý: phần cuối câu 2
Readln;
End.