Chủ đề / Chương

Bài học

Hãy tham gia nhóm Học sinh Hoc24OLM
Nguyen Bảo Nhi
Viết chương trình nhập và xuất mảng có 100 phần tử các số nguyên1/Nhập vào 1 số nguyên k, cho biết vị trí nào trong mảng bằng với k.2/Nhập vào số nguyên h, cho biết h xuất hiện bao nhiêu lần trong mảng3/ Tổng các phần tử của dãy4/Số lượng các số hạng dương và tổng các số hạng dương5/Số lượng các số hạng âm và tổng của các số hạng âmViết chương trình nhập và xuất mảng có 100 phần tử các số nguyên
Đọc tiếp
Lớp 8 Tin học Bài 9. Làm việc với dãy số
Những câu hỏi liên quan
Diễm Phạm Thị Hồng
Lập trình thực hiện các công việc sau và hiển thị kết quả ra màn hình:A,Nhập vào một mảng số nguyên A gồm n phần tửB,Cho biết phần tử dương nhỏ nhất trong mảngC,Nhập vào một số nguyên k và cho biết k có xuất hiện trong mảng hay không?Nếu có,tại những vị trí  k  xuất hiện trong mảng thay k bằng giá trị 0 rồi viết kết quả ra màn hìnhD,Sắp xếp mảng theo chiều âm lên trước rồi đến số dương,cuối cùng là số 0
Đọc tiếp
Xem chi tiết
Lớp 11 Tin học

Khách
 
Diễm Phạm Thị Hồng
31 tháng 7 2023 lúc 22:25

Mn giúp e vơi e đang cần gấp!!!!!

Bình luận (0)
HOÀNG ĐẠI PHÚC

viết chương trình nhập vào mảng a có n phần tử là các số nguyên dương.Tìm các số xuất hiện trong mảng a và số có số lần xuất hiện nhiều nhất

Xem chi tiết
Lớp 8 Tin học Phần mềm học tập

Khách
 
Divine 000
1.     Viết chương trình nhập vào một mảng các số nguyên. Tìm tổng các số. 2.     Viết chương trình nhập vào một mảng các số nguyên. Tính và xuất tổng các số chẵn có trong mảng.3.     Viết chương trình nhập vào một mảng các số nguyên. Tính và xuất tổng các số lẻ có trong mảng.4.     Viết chương trình nhập vào một dãy các số nguyên. Hãy đưa ra màn hình có bao nhiêu số chẳn và bao nhiêu số lẻ trong dãy.5.     Viết chương trình nhập vào một dãy gồm N số nguyên. Cho biết có bao nhiêu số có giá trị c...
Đọc tiếp
Xem chi tiết
Lớp 11 Tin học Bài 11: Kiểu mảng

Khách
 
Nguyễn Lê Phước Thịnh
21 tháng 2 2021 lúc 13:50

Câu 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 

  t:=t+a[i];

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

readln;

end.

Câu 2: 

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('Tong cac so chan la: ',t);

readln;

end.

Bình luận (0)
uyen hihi

Viết chương trình nhập vào số nguyên dương k, N (N≤1000), và các phần tử của mảng từ
A 1 ,…,A N là các số nguyên trong phạm vi từ ±5000. Tìm và xuất ra màn hinh
a) Có bao nhiêu phần tử có giá trị bằng k.
b) Vị trị của các phần tử có giá trị bằng k. Tính tổng các số có giá trị bằng k.

Xem chi tiết
Lớp 11 Tin học Bài 11: Kiểu mảng

Khách
 
Võ Đức Dũng
24 tháng 8 2021 lúc 21:42
Uses crt;

Var i,k,n,bk,tong: integer;

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

Begin

write('Nhap K: '); readln(k);

write('Nhap N: '); readln(n);

for i:=1 to n do

begin

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

end;

{câu a}

For i:=1 to n do 

if a[i]=k then bk:=bk+1;

writeln('Co so phan tu bang k la:',k);

{câu b}

For i:=1 to n do 

if a[i]=k then

begin

write(i,' ');

tong:=tong+a[i];

end;

write('. Tong la:',tong);

readln

end.

Bình luận (0)
phạm quang huy
31 tháng 8 2021 lúc 20:21

uses crt;
var k,n,tong,d,i:longint;a:array[1..1000]of longint;
begin
 clrscr;
  write('n=');readln(n);
  write('k=');readln(k);
  for i:=1 to n do
        begin
         write('a[',i,']=');readln(a[i]);
        end;
  d:=0;
  for i:=1 to n do if(a[i]=k)then inc(d);
  writeln('so phan tu bang voi:',k,' la:',d);
  write('cac so co vi tri bang voi:',k,' la:');
  tong:=0;
  for i:=1 to n do if(a[i]=k)then
        begin
         write(i,' ');
         tong:=tong+a[i];
        end;
  write('tong cua cac so bang voi:',k,' la:',tong);
 readln;
end.

Bình luận (0)
uyen hihi
24 tháng 8 2021 lúc 9:10

giúp với pleaseeeeee

 

Bình luận (0)
Thảo Vy

1.    Viết chương trình nhập mảng gồm n số nguyên và 1 số nguyên k. Tìm xem k có xuất hiện trong mảng hay không? Nếu có thì ở những vị trí nào?( python)

Xem chi tiết
Lớp 11 Tin học Bài 11: Kiểu mảng

Khách
 
Thuý Vy
viết chương trình nhập vào mảng 1 chiều A gồm có n phần tử là kiểu số nguyên 1=1000 cho biết trong mảng có bao nhiêu phần tử chia hết cho 3 xuất mảng và hiển thị kết quả
Xem chi tiết
Lớp 11 Tin học Bài 11: Kiểu mảng

Khách
 
Nguyễn Lê Phước Thịnh
17 tháng 1 2021 lúc 18:01

uses crt;

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

i,n,dem:integer;

begin

clrscr;

repeat

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

until (1<=n) and (n<=1000);

for i:=1 to n do 

  begin

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

end;

writeln('Mang ban vua nhap la: ');

for i:=1 to n do 

  write(a[i]:4);

writeln;

dem:=0;

for i:=1 to n do 

  if a[i] mod 3=0 then inc(dem);

writeln('So phan tu chia het cho 3 la: ',dem);

readln;

end.

Bình luận (0)
Huynhnhu

Cho mảng a gồm n phần tử. Viết chương trình đưa ra số lần k xuất hiện trong mảng k được nhập vào bàn phím

Xem chi tiết
Lớp 11 Tin học Bài 7: Các thủ tục chuẩn vào ra đơn giản

Khách
 
Huynhnhu

Cho mảng a gồm n phần tử. Viết chương trình đưa ra số lần k xuất hiện trong mảng k được nhập vào bàn phím

Xem chi tiết
Lớp 11 Tin học Bài 11: Kiểu mảng

Khách
 
Yến Nhi

Viết chương trình nhập vào mảng A gồm N số nguyên (N<=100). Nhập vào một số nguyên k từ bàn phím. Xuất ra màn hình những phần tử của mảng là bội số của k.

giúp e với a 

Xem chi tiết
Lớp 11 Tin học Bài 11: Kiểu mảng

Khách
 
Nguyễn Lê Phước Thịnh
20 tháng 4 2021 lúc 22:22

uses crt;

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

i,n,k:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

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

for i:=1 to n do 

  if a[i] mod k=0 then write(a[i]:4);

readln;

end.

Bình luận (0)

Khoá học trên OLM (olm.vn)