Trang chủ Tin Học Lớp 8 nhập mảng gồm n phần tử. kiểm tra xem trong...

nhập mảng gồm n phần tử. kiểm tra xem trong mảng có số chẳn hay không? in ra các số chẳn đó câu hỏi 2445726 - hoctapsgk.com

Câu hỏi :

nhập mảng gồm n phần tử. kiểm tra xem trong mảng có số chẳn hay không? in ra các số chẳn đó

Lời giải 1 :

Program Typlex271;

Uses crt;

Var i,n: integer;

      M: array[1..10000] of real;

Begin

      Writeln('Nhap so phan tu:'); Readln(n);

      For i:=1 to n do read(M[i]);

      For i:=1 to n do

            If M[i] mod 2 = 0 then write(M[i]);

      Readln

End.

Thảo luận

-- chương trình sửa của bạn chỉ nhập n, chưa nhập mảng?
-- z bn manhquang0306 lm ik
-- vậy là chưa chạy thử chương trình rồi :v
-- Thì chèn thêm dòng nhập mảng sau n là được chứ gì @laptrinhtin chèn câu sau phái sau cái nhập n "For i:=1 to n do read(M[i]);"
-- bổ sung thêm sau câu lệnh write(M[i]); ở cuối là write(M[i],' '); nhé @Laptrinhtin
-- Xin fb đi bn @manhquang0306
-- Vct nhập mảng gồm n phần tử. Đếm xem trong mảng có bao nhiêu số âm. đưa ra vị trí các số âm đó bằng pascal
-- giúp mik

Lời giải 2 :

var a,b:array[0..10000007] of longint;
    i,n,j:longint;
begin
 readln(n);
for i := 1 to n do read(a[i]);
for i := 1 to n do
begin
 if a[i] mod 2 = 0 then
     begin
         inc(j);
         b[j] := a[i];
     end;
end;
writeln('Co');
for i := 1 to j do
write(b[i],#32);
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