Viết đoạn chương trình nhập mảng n phần tử từ bàn phím

Top 1 ✅ Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất và tính tong các số dương của mảng nam 2022 được cập nhật mới nhất lúc 2021-12-22 01:58:00 cùng với các chủ đề liên quan khác

Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất ѵà tính tong các số dương c̠ủa̠ mảng

Hỏi:

Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất ѵà tính tong các số dương c̠ủa̠ mảng

Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất ѵà tính tong các số dương c̠ủa̠ mảng

Đáp:

minhuyen:

program ct;

uses crt;

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

      i,n,m:integer;

      S:longint;

begin clrscr;

   write(‘Nhap so phan tu n: ‘); readln(n);

   for i:=1 to n do

     begin

        writeln(‘Nhap phan tu thu ‘,i,’: ‘); readln(A[i]);

     end;

     m:=A[1]; S:=0;

   for i:=1 to n do

     begin

        if A[i]>m then m:=A[i];

        if A[i]>0 then S:=S+A[i];

     end;

   writeln(‘So lon nhat la: ‘,m);

   writeln(‘Tong la: ‘,S);

readln;

end.

Học tốt!

minhuyen:

program ct;

uses crt;

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

      i,n,m:integer;

      S:longint;

begin clrscr;

   write(‘Nhap so phan tu n: ‘); readln(n);

   for i:=1 to n do

     begin

        writeln(‘Nhap phan tu thu ‘,i,’: ‘); readln(A[i]);

     end;

     m:=A[1]; S:=0;

   for i:=1 to n do

     begin

        if A[i]>m then m:=A[i];

        if A[i]>0 then S:=S+A[i];

     end;

   writeln(‘So lon nhat la: ‘,m);

   writeln(‘Tong la: ‘,S);

readln;

end.

Học tốt!

minhuyen:

program ct;

uses crt;

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

      i,n,m:integer;

      S:longint;

begin clrscr;

   write(‘Nhap so phan tu n: ‘); readln(n);

   for i:=1 to n do

     begin

        writeln(‘Nhap phan tu thu ‘,i,’: ‘); readln(A[i]);

     end;

     m:=A[1]; S:=0;

   for i:=1 to n do

     begin

        if A[i]>m then m:=A[i];

        if A[i]>0 then S:=S+A[i];

     end;

   writeln(‘So lon nhat la: ‘,m);

   writeln(‘Tong la: ‘,S);

readln;

end.

Học tốt!

Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất ѵà tính tong các số dương c̠ủa̠ mảng

Xem thêm : ...

Vừa rồi, cá-con.vn đã gửi tới các bạn chi tiết về chủ đề Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất và tính tong các số dương của mảng nam 2022 ❤️️, hi vọng với thông tin hữu ích mà bài viết "Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất và tính tong các số dương của mảng nam 2022" mang lại sẽ giúp các bạn trẻ quan tâm hơn về Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất và tính tong các số dương của mảng nam 2022 [ ❤️️❤️️ ] hiện nay. Hãy cùng cá-con.vn phát triển thêm nhiều bài viết hay về Viết chương trình nhập mảng gồm n phần tử nhập từ bàn phím, Tìm số lớn nhất và tính tong các số dương của mảng nam 2022 bạn nhé.

Top 1 ✅ Viết chương trình tính tổng, hiệu, tích của mảng gồm n phần tử, n nhập từ bàn phím nam 2022 được cập nhật mới nhất lúc 2021-12-24 11:38:11 cùng với các chủ đề liên quan khác

Viết chương trình tính tổng, hiệu, tích c̠ủa̠ mảng gồm n phần tử, n nhập từ bàn phím

Hỏi:

Viết chương trình tính tổng, hiệu, tích c̠ủa̠ mảng gồm n phần tử, n nhập từ bàn phím

Viết chương trình tính tổng, hiệu, tích c̠ủa̠ mảng gồm n phần tử, n nhập từ bàn phím

Đáp:

annhocbichchau:

program tht;

uses crt;

var A:array[1..1000] of integer

      i,n:integer

      S,H,T:longint;

begin clrscr;

   writeln(‘Nhap so phan tu n: ‘); readln(n);

   for i:=1 to n do

     begin

       writeln(‘A[‘,i,’]’); readln(A[i]);

     end;

   S:=0; H:=0; T:=0;

  for i:=1 to n do

    begin 

       S:=S+A[i];

       H:=H-A[i];

       T:=T*A[i];

     end;

   writeln(‘Tong mang tren la: ‘,S);

   writeln(‘Hieu mang tren la: ‘,H);

   writeln(‘Tich mang tren la: ‘,T);

readln;

end.

Học tốt!

annhocbichchau:

program tht;

uses crt;

var A:array[1..1000] of integer

      i,n:integer

      S,H,T:longint;

begin clrscr;

   writeln(‘Nhap so phan tu n: ‘); readln(n);

   for i:=1 to n do

     begin

       writeln(‘A[‘,i,’]’); readln(A[i]);

     end;

   S:=0; H:=0; T:=0;

  for i:=1 to n do

    begin 

       S:=S+A[i];

       H:=H-A[i];

       T:=T*A[i];

     end;

   writeln(‘Tong mang tren la: ‘,S);

   writeln(‘Hieu mang tren la: ‘,H);

   writeln(‘Tich mang tren la: ‘,T);

readln;

end.

Học tốt!

annhocbichchau:

program tht;

uses crt;

var A:array[1..1000] of integer

      i,n:integer

      S,H,T:longint;

begin clrscr;

   writeln(‘Nhap so phan tu n: ‘); readln(n);

   for i:=1 to n do

     begin

       writeln(‘A[‘,i,’]’); readln(A[i]);

     end;

   S:=0; H:=0; T:=0;

  for i:=1 to n do

    begin 

       S:=S+A[i];

       H:=H-A[i];

       T:=T*A[i];

     end;

   writeln(‘Tong mang tren la: ‘,S);

   writeln(‘Hieu mang tren la: ‘,H);

   writeln(‘Tich mang tren la: ‘,T);

readln;

end.

Học tốt!

Viết chương trình tính tổng, hiệu, tích c̠ủa̠ mảng gồm n phần tử, n nhập từ bàn phím

Xem thêm : ...

Vừa rồi, giá-xe-máy.vn đã gửi tới các bạn chi tiết về chủ đề Viết chương trình tính tổng, hiệu, tích của mảng gồm n phần tử, n nhập từ bàn phím nam 2022 ❤️️, hi vọng với thông tin hữu ích mà bài viết "Viết chương trình tính tổng, hiệu, tích của mảng gồm n phần tử, n nhập từ bàn phím nam 2022" mang lại sẽ giúp các bạn trẻ quan tâm hơn về Viết chương trình tính tổng, hiệu, tích của mảng gồm n phần tử, n nhập từ bàn phím nam 2022 [ ❤️️❤️️ ] hiện nay. Hãy cùng giá-xe-máy.vn phát triển thêm nhiều bài viết hay về Viết chương trình tính tổng, hiệu, tích của mảng gồm n phần tử, n nhập từ bàn phím nam 2022 bạn nhé.

Bài 9: Làm việc với dãy số – Câu 5 Trang 78 SGK Tin học 8. Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của 1 dãy số.Độ dài của dãy cũng được nhập từ bàn phím

Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của 1 dãy số.Độ dài của dãy cũng được nhập từ bàn phím

Lời giải : 

uses crt;

var n,i:integer;

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

begin

clrscr;

write(‘nhap so phan tu cua day:’);readln(n);

for i:=1 to n do

Quảng cáo

begin

write(‘a[‘,i,’]=’);readln(a[i]);

end;

writeln(‘day so da nhap:’);

for i:=1 to n do write(a[i]:2);

readln;

end.

  • lý thuyết
  • trắc nghiệm
  • hỏi đáp
  • bài tập sgk

1.viết chương trình nhập vào mảng A gồm N phần tử (N<= 500) từ bàn phím. Sau đó, tính tổng các phần tử âm chia hết cho cho 7

2.viết chương trình nhập vào mảng C gồm 10 phần tử từ bàn phím. Sau đó xuất ra các phần tử là số nguyên tố

3.viết chương trình tạo nhập vào mảng D gồm K phần tử (K<= 200) từ bàn phím. Sau đó cho biết có bao nhiêu phần tử chẵn có 2 chữ số

mn giúp em giải với ạ

Các câu hỏi tương tự