Chương trình chứa các câu lệnh giúp máy tính hiểu và thực hiện theo yêu cầu của con người. Vì vậy chương trình như ngôn ngữ giao tiếp giữa người và máy, nên cần viết chương trình để máy tính thực hiện lệnh theo yêu cầu.

SGK tin 8 trang 7

Viết chương trình là hướng dẫn máy tính thực hiện các công việc hay giải một bài toán cụ thể. Viết chương trình giúp con người điều khiển máy tính đơn giản và hiệu quả hơn.

   Đáp án: D

Chọn bước:

1) Từ mô tả thuật toán bằng liệt kê các bước, viết chương trình Python thực hiện thuật toán.

=> Như vậy dễ nắm được các bước thực hiện và giúp bài toán có phương pháp giải chính xác hơn.

A. Chương trình dịch 

A

Câu a nha

- Chương trình là bản hướng dẫn cho máy tính thực hiện những nhiệm vụ cụ thể. - Khái niệm câu lệnh: là những chỉ dẫn, nhiệm vụ cần được thực hiện được đưa ra để ra lệnh cho máy tính làm việc. - Khái niệm chương trình: là một dãy các câu lệnh mà máy tính có thể hiểu để thực hiện theo.

Do nhu cầu mục đích sử dụng của con người rất đa dạng và phức tạp. Nên một lệnh đơn giản không đủ để chỉ dẫn cho máy tính. Vì vậy cần phải viết nhiều lệnh và tập hợp lại trong 1 chương trình giúp con người điều khiển máy tính đơn giản và hiệu quả hơn.

Code : Breacker

Hãy cho biết lí do cần phải viết chương trình để điều khiển máy tính. 

Trả lời:

Máy tính thực chất chỉ là một thiết bị điện tử vô tri vô giác. Để máy tính có thể thực hiện một công việc theo mong muốn của mình thì con người phải đưa ra những chỉ dẫn thích hợp cho máy. Việc viết nhiều lệnh và tập hợp lại trong một chương trình, giúp con người điều khiển máy tính một cách đơn giản và hiệu quả hơn. 

Do nhu cầu mục đích sử dụng của con người rất đa dạng và phức tạp. Nên một lệnh đơn giản không đủ để chỉ dẫn cho máy tính. Vì vậy cần phải viết nhiều lệnh và tập hợp lại trong 1 chương trình giúp ccon người điều khiển máy tính đơn giản và hiệu quả hơn.

T mik nha !

1:

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do 

  if a[i] mod 2<>0 then t:=t+a[i];

writeln(t);

readln;

end.

3:

const fi='dl.txt'

fo='kq.txt'

var f1,f2:text;

a:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a);

writeln(f2,a);

close(f1);

close(f2);

end.

2:

uses crt;

var st:string;

d:integer;

begin

clrscr;

write('Nhap xau:'); readln(st);

d:=length(st);

while st[1]=#32 do 

  begin

delete(st,1,1);

d:=length(st);

end;

while st[d]=#32 do 

  begin

delete(st,d,1);

d:=length(st);

end;

writeln(st);

readln;

end.

Câu 1: 

uses crt;

var a:array[1..100]of integer;

i,n,t,s:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

s:=1;

dem:=0;

for i:=1 to n do 

  if a[i] mod 3=0 then 

begin

inc(dem);

t:=t+a[i];

s:=s*a[i];

end;

if dem=0 then writeln('Khong co so chia het cho 3 trong day')

else begin

writeln('Tong cac so chia het cho 3 la: ',t);

writeln('Tich cac so chia het cho 3 la: ',s);

end;

readln;

end.

Câu 2: 

uses crt;

var a:array[1..100]of integer;

i,n,dem,t:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

dem:=0;

t:=0;

for i:=1 to n do 

 if a[i] mod 2=0 then 

begin

inc(dem);

t:=t+a[i];

end;

writeln('So so chan la: ',dem);

writeln('Tong cac so chan la: ',t);

readln;

end.

Câu 3: 

uses crt;

var a:array[1..100]of integer;

i,n,dem1,dem2,t1,t2,s1,s2:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

dem1:=0;

dem2:=0;

t1:=0;

t2:=0;

s1:=1;

s2:=1;

for i:=1 to n do

begin

if a[i] mod 2=0 then 

begin

inc(dem1);

t1:=t1+a[i];

s1:=s1*a[i];

end

else begin

inc(dem2);

t2:=t2+a[i];

s2:=s2*a[i];

end;

end;

if dem1=0 then writeln('Khong co so chan trong day')

else begin

writeln('So so chan la: ',dem1);

writeln('Tong cac so chan la: ',t1);

writeln('Tich cac so chan la: ',s1);

end;

if dem2=0 then writeln('Khong co so le trong day')

else begin

writeln('So so le la: ',dem2);

writeln('Tong cac so le la: ',t2);

writeln('Tich cac so le la: ',s2);

end;

readln;

end.