Trang chủ Tin Học Lớp 8 Bài 5: (5đ) Nhà trường to chức một buổi lao...

Bài 5: (5đ) Nhà trường to chức một buổi lao dộng với chủ de "Truờng em xanh, Sach, dep" Tham gia có 2 lop 9(A,B) tinh nguyện theo phát dong của Đội Thiến n

Câu hỏi :

mn giúp em với em vote 5* cho ạ em cảm ơn

image

Lời giải 1 :

program Taylor;
uses crt;
var n,max,l,k,a,i:longint; s,m:string;
begin
clrscr;
   write('n=');readln(n);
   for i:=1 to n*2 do
      begin
         write('Nhap vao danh sach:');readln(s);
         val(copy(s,3,2),a);
         if s[2]='A' then inc(k,a) else inc(l,a);
         if a>max then begin max:=a; m:=s; end;
      end;
   if k>l then writeln('Lop 9A nhieu rac hon') else writeln('Lop 9B nhieu rac hon');
   writeln('Nguoi co nhieu rac nhat o lop 9',m[2],', so ',m[5],m[6]);
readln
end.

///////////////////////////////////////

Test:

image

Thảo luận

-- bi loi ban oi
-- Ở đâu vậy bạn
-- phần val(copy(s,3,2),a);
-- Sao mình thấy đúng mà
-- mk test lại và sửa lỗi thì val(copy(s,3,2),a,a); thêm ,a nữa ms dc
-- Không cần cũng được mà bạn
-- Bạn cho mình xem tét được ko

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 :))

Copyright © 2021 HOCTAP247