Em cần giúp đỡ gì vậy nhỉ?

=)))))

chua nhé bnnmn

chư

a nhé

Wtf

duong manh dung ...... ??? Câu hỏi có sai hay thiếu ko bạn ??? =.=

uses crt;

var n,i:longint;

kt:boolean;

begin

clrscr;

readln(n);

if (n<2) then writeln('Nhap lai')

else 

begin

kt:=true;

for i:=2 to trunc(sqrt(n)) do 

  if n mod i=0 then

begin

kt:=false;

break;

end;

if kt=true then writeln('la so nguyen to')

else writeln('khong la so nguyen to');

end;

readln;

end.

em cảm ơn cô rất nhiều!!!

Program HOC24;

var i,a,b: longint;

d: byte;

function t(x:  longint):  longint;

var j,t1:  longint;

begin

t1:=0;

for j:=1 to x do if x mod j=0 then t1:=t1+j;

t:=t1;

end;

begin

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

d:=0;

for i:=a to b do

if (t(i)/i)=12/5 then d:=d+1;

write(d);

readln

end.

uses crt;

var a,i,s:longint;

begin

clrscr;

write('a='); readln(a);

s:=0;

for i:=1 to a do

begin

if i mod 2=1 then s:=s+i

else s:=s-i;

end;

writeln('Ket qua la: ',s);

readln;

end.

Bài đó có trong thii á bn

Theo Von Neumanm. Cấu trúc chung của máy tính gồm 3 phần:

+ Bộ xử lí trung tâm (CPU)

+ Bộ nhớ

+ Thiết bị vào/ra

* Bộ xử lí trung tâm(CPU) được xem là bộ não của máy tính thực hiện các chức năng tính toán, điều khiển, điều phối mọi hoạt động của máy tính theo sự chỉ dẫn của chương trình.

* Bộ nhớ dùng để lưu chương trình và dữ liệu. Được chia ra làm hai loại: bộ nhớ trong và bộ nhớ ngoaì.