Trang chủ Tin Học Lớp 8 Điểm kiểm tra môn tin học của n học sinh...

Điểm kiểm tra môn tin học của n học sinh lớp 8A được khai báo như là mảng a (mảng a gồm 50 phần tử kiểu số thực). để in ra màn hình điểm của n học sinh trong l

Câu hỏi :

Điểm kiểm tra môn tin học của n học sinh lớp 8A được khai báo như là mảng a (mảng a gồm 50 phần tử kiểu số thực). để in ra màn hình điểm của n học sinh trong lớp có 2 cách: 1. In ra một dãy điểm theo hàng, khi hết độ rộng màn hình sẽ tự động xuống hàng 2.In ra thành cột điểm, mỗi điểm in trên 1 dòng Em hãy viết hai đoạn chương trình tương ứng với hai cách thực hiện nói trên

Lời giải 1 :

*Mình làm 2 cách luôn cho bạn nhé.

*Cách 1:

uses crt;
var a:array[1..50] of real;
       n,i:integer;
begin
       clrscr;
       write('Nhap so luong hoc sinh: '); readln(n);
       for i:=1 to n do 
              begin
                     write('Nhap diem Tin hoc ban thu ',i,': '); readln(a[i]);
              end;
       write('Day diem theo hang: ');
       for i:=1 to n do write(a[i]:0:1,'; ');
       readln;
end.

*Cách 2:

uses crt;
var a:array[1..50] of real;
       n,i:integer;
begin
       clrscr;
       write('Nhap so luong hoc sinh: '); readln(n);
       for i:=1 to n do 
              begin
                     write('Nhap diem Tin hoc ban thu ',i,': '); readln(a[i]);
              end;
       writeln('Day diem theo cot: ');
       for i:=1 to n do writeln(a[i]:0:1,' ');
       readln;
end.

Thảo luận

Lời giải 2 :

Cách 1:

Program Hello;

uses crt;
var a:array[1..50] of real;
       n,i:integer;
begin
       readln(n);
       for i:=1 to n do 
           read(a[i]);
       write('Day diem theo hang: ');
       for i:=1 to n do write(a[i]:2:2,'  ');
readln;

readln;
end.

Cách 2:

Program Hello;

uses crt;
var a:array[1..50] of real;
       n,i:integer;
begin
       readln(n);
       for i:=1 to n do 
           read(a[i]);
       write('Day diem theo hang: ');
       for i:=1 to n do writeln(a[i]:2:2,'  ');
readln;

readln;
end.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK