B1: Chuyển số nguyên dương qua xâu

B2: Chạy từ đầu đến hết xâu và cộng từng kí tự và cộng thêm 1 dấu cách

B3: In kết quả và kết thúc

B1: Nhập các phần tử và số nguyên k

B2: Tìm tất cả phần tử bé hơn k

B3: Cộng tất cả phần tử bé hơn k lại

B4: In kết quả và kết thúc.

B1: Nhập các phần tử và số nguyên k

B2: Tìm tất cả phần tử bằng k

B3: Cộng tất cả tử tìm được vào 1 biến tổng

B4: In kết quả và kết thúc.

For a:=0 to 9 do

for x:=0 to 9 do

for b:=0 to 9 do

if a*x+b=0 then write(............

Lời giải:

program hotrotinhoc;

var a,b : integer;

Function UCLN(x,y: integer): integer;

var z: integer;

begin

while y<>0 do

begin

z:= x mod y;

x:=y;

y:=z;

end;

ucln:=x;

end;

begin

readln(a);

readln(b);

write(ucln(a,b));

readln

end.

Mình chỉ viết một đoạn chương trình xong bạn đưa vào chương trình chính nhé , nếu có gì thắc mắc thì nhắn tin với mình.

1.

a) d:=0;

For i:=1 to n do if a[i]=k then inc(d);

b) dem:=0;

For i:=1 to n do if a[i] mod k=0 then inc(dem);

2.

a) dem:=0; d:=0;

For i:=1 to n do

begin

if a[i] mod 2=0 then inc(d);

if a[i] mod 2<>0 then inc(dem);

end;

b);

function nt(x: integer): boolean;

var i: integer;

begin

nt:=false;

if x<2 then exit;

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

if x mod i = 0 then exit;

nt:=true;

end;

// Thân chương trình

d:=0;

for i:=1 to n do if nt(a[i]) then inc(d);

Bạn có thể trình bày 1a ,b bằng thuật toán không. Mình không hiểu

B1: Tạo một biến max ; max=0;

B2: So sánh các phần tử với max nếu lớn hơn max thì max:=a[i];

B3: In kết quả và kết thúc.

Câu 5 :

Một máy tính chưa có phần mềm không thể hoạt động được bởi vì phần mềm gồm các chương trình, mà chương trình là một dãy lệnh chỉ cho máy biết điều cần làm tại mỗi thời điểm. Cho nên không có phần mềm trong máy tính thì máy không thể hoạt động được. Chẳng hạn, khi không có hệ điều hành (là một phần mềm) thì máy tính sẽ không hoạt động được.

Hệ thống tin học gồm các thành phần:

Những đặc điểm ưu việt của máy tính là:

- Máy tính có thể “làm việc không mệt mỏi” trong suốt 24/24 giờ.

- Tốc độ xử lí thông tin của máy tính rất nhanh và ngày càng được nâng cao. Tốc độ của máy tính được tăng lên hàng triệu lần trong vòng sáu mươi năm trở lại đây.

- Máy tính là một thiết bị tính toán có độ chính xác cao.

- Máy tính có thể lưu trữ một lượng lớn thông tin trong một không gian rất hạn chế_. Chẳng hạn, một đĩa CD, một đĩa USB có kích thước nhỏ nhưng có thể chứa nội dung của nhiều quyển sách, tài liệu... Những thiết bị lưu trữ thông tin của máy tính càng ngày được cải tiến để có dung lượng lớn hơn và tiện sử dụng hơn.

- Giá thành máy tính ngày càng hạ nhờ những tiến bộ kỹ thuật vượt bậc. Đây chính là yếu tố quan trọng làm cho việc sử dụng máy tính ngày một trở nên phổ biến he:

- Máy tính ngày càng gọn nhẹ và tiện dụng.

- Các máy tính có thể liên kết với nhau thành một mạng và các mạng máy tính tạo ra khả năng thu thập và xử lí thông tin tốt hơn. Các mạng máy tính lại có thể liên kết với nhau thành một mạng lớn hơn, thậm chí trẽn phạm vi toàn cầu.