Cho 2 số nguyên a và b viết phương trình
a.tính bình phương của a,lập phương của b
b.ktra xem a là số chẵn hay số lẻ( dùng clenh if then)
c ktra xem b có chia hết cho 3 hoặc 5 hay ko
Cho 2 số nguyên a và b viết phương trình
a.tính bình phương của a,lập phương của b
b.ktra xem a là số chẵn hay số lẻ( dùng clenh if then)
c ktra xem b có chia hết cho 3 hoặc 5 hay ko
Program BT;
Uses crt;
Var a, b, i: integer;
Begin
Clrscr;
Write(‘Nhap a, b: ‘); readln(a, b);
Writeln(‘Binh phuong cua ‘,a,’ la: ‘,sqr(a));
Writeln(‘Lap phuong cua ‘,b,’ la: ‘,b*b*b);
Writeln(‘——-‘);
If a mod 2 = 0 then writeln(a,’ la so chan’)
Else writeln(a,’ la so le’);
If b mod 3 = 0 then writeln(b,’ chia het cho 3′);
If b mod 5 = 0 then writeln(b,’ chia het cho 5′);
Readln
End.