uses crt;
var a,i:integer;
begin
clrscr;
a:=65;
while a<>0 do
begin
i:=a mod 2;
a:=a div 2;
write(i);
end;
readln;
end.
Giúp mik với ạ mik đang cần gấp
Giúp mik với mik cần gấp ạ .cảm ơn
Giup mik voi ạ mik cần gấp bài này .cảm ơn
Giúp mik bài 3 với ạ đang cần gấp
viết chương trình pascal tính tổng của n số tự nhiên. ...Mình cần câu trả lời gấp ạ ,t2 thi rồiii, chính xác nữa được ko ạ!!!!! Mik cảm ơn trc
Viết ct nhập một dãy số nguyên a gồm n phần tử.in ra số nguyên tố
Giúp mik vs ạ cần gấp lắm!
viết chương trình nhập vào 2 số a, b và kiểm tra xem hai số đó là âm hay dương. Nếu a là dương thì in ra (a+b)^2
Ai giúp mik vs ạ! Mik đag cần gấp
Mọi người giúp mik vs nhé, mik cần gấp, sắp thi rồi. Mik cảm ơn trc ạ: C1: nhập vào 1 mảng gồm n phần tử, tính giá trị trung bình của dãy số đó. C2: Viết chương trình nhập dãy n số và in ra tổng các số chẵn, tổng các số lẻ trong dãy cần nhập. C3: viết chương trình nhập dãy n số và cho biết số nhỏ nhất trong các số vừa nhập là số thư mấy?
Xác định bài toán sau : tìm số có giá trị lớn nhất trong 4 số thực m,n,k,p dc nhập từ bàn phím :
mik cần gấp ạ
