1) Nếu x>1 và y<=1 thì Z:=x-y ngược lại
nếu x<1 và y=1 thì Z:=x+y ngược lại
nếu x=1 và y>1 thì Z=1,5 ngược lại
Z=0
2) Thay a:=45 vào biểu thức A:=A+3; ta có
A:=45+3;
A:=48;
Thây b:=18 vào biểu thức b:=b-1; ta có
b:=18-1;
b:=17;
Thay a:=48 và b:=17 vào biểu thúc C, ta co:
C:=(48+17) div 2,
c:=32
Thay c:= 32 vào biểu thưc D. ta có
D:=(32 mod 2)
d:=0;
vậy kq:=0;
3)
Program bai3;
Use crts;
Var T,a,b:integer;
Begin
clrscr;
Writeln('nhap a,b'); readln(a,b);
t:=(13*a*a*a)+(50*b);
Writeln('Gia tri cua bieu thuc T la: ',t);
Readln;
End.
