uses crt;

var n:integer;

begin

clrscr;

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

if n>0 then write('So ',n,' la so duong')

else write('So ',n,' la so am');

readln;

end.

Ai có đề thi hsg tin 9 hoặc 10 cấp tỉnh không cho mình xin(từ 2017 trở đi)

là mái nhà,mái chèo

5 + 7 = 12 

nha bn 

mn nhớ ủng hộ mik nha 

mik sẽ ủng hộ mn lại 

hứa

Ta có:

(50+50)+(90+10)+(40+60)+(600+400)+700=100+100+100+1000+700=300+700+1000=1000+1000=2000

c va a

chuan do

tk nhe

xin

Cho số nguyên dương N (N ≤ 105).

Yêu cầu: Tìm số các cặp số nguyên dương x, y sao cho:

Dữ liệu vào: Vào từ file văn bản NT.INP gồm một số duy nhất N.

Kết quả: Đưa ra file văn bản NT.OUT một số là số các cặp số tìm được.

Ví dụ: