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
1 câu trả lời
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.
Câu hỏi trong lớp
Xem thêm
