Question

Viết chương trình nhập vào 1 số nguyên n rồi đưa ra màn hình các kết quả

- Giá trị tuyệt đối của n

- bình phương của n

- số dư của bình phương n chia 3

Answer 1

var n:integer;

begin

readln(n);

writeln(abs(n));

writeln(sqr(n));

writeln(n mod 3);

end.

mình làm tắt nhé. chúc bạn học tốt:>

Answer 2

uses crt;

var n,du:integer;

begin

clrscr;

write('n='); readln(n);

writeln('gia tri tuyet doi cua ',n,'=',abs(n));

writeln('binh phuong cua ',n,'=',sqr(n));

du:=sqr(n) mod 3;

writeln('so du cua ',n,' binh phuong chia 3 la: ',du);

readln;

end.