Câu 1: Viết cú pháp lệnh khai báo biến mảng? Khai báo 2 biến x,y kiểu mảng có 50 phần tử nguyên. Câu 2: Viết chương trình nhập vào một dãy (mảng) gồm n số và in ra các số chia hết cho 3 đã nhập. Em...

UA

Utfg aghjn

27 tháng 3 2022

Câu 1: Viết cú pháp lệnh khai báo biến mảng? Khai báo 2 biến x,y kiểu mảng có 50 phần tử nguyên. Câu 2: Viết chương trình nhập vào một dãy (mảng) gồm n số và in ra các số chia hết cho 3 đã nhập. Em hãy thực hiện các yêu cầu sau (không viết chương trình): - Em hãy xác định input, output của bài toán - Em hãy khai báo các biến sử dụng trong bài trên Câu 3: Viết chương trình nhập vào n, tính...

Đọc tiếp

#Tin học lớp 8

0

NN

Nguyen Nhi

25 tháng 2 2021

Câu 1. Cho một dãy số gồm n số nguyên (cả âm và dương) với n<=100. Hãy khai báo biến mảng trên?Câu 2. Viết chương trình nhập từ bàn phím một dãy gồm 10 số. Đưa ra màn hình số nhập thứ 5.Câu 3. Viết chương trình nhập vào một mảng A (tối đa 15 giá trị) là các số nguyên (Ai<=100)a) In mảng đã nhập (Mỗi giá trị cách nhau 1 dấu cách)b) Tính tổng các phần tử chia hết cho 3c)...

Đọc tiếp

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

25 tháng 2 2021

Câu 1:

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

Câu 2:

uses crt;

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

i:integer;

begin

clrscr;

for i:=1 to 10 do

begin

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

end;

for i:=1 to 10 do

write(a[i]:4);

readln;

end.

Câu 3:

uses crt;

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

i,n,t:integer;

begin

clrscr;

repeat

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

until (0<n) and (n<=15);

for i:=1 to n do

begin

repeat

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

until a[i]<=100;

end;

writeln('Mang da nhap la: ');

for i:=1 to n do

write(a[i]:4);

writeln;

t:=0;

for i:=1 to n do

if a[i] mod 3=0 then t:=t+a[i];

writeln('Tong cac phan tu chia het cho 3 la: ',t);

writeln('Cac so chan o vi tri le trong day la: ');

for i:=1 to n do

if (a[i] mod 2=0) and (i mod 2=1) then write(a[i]:4);

readln;

end.

Đúng(1)

T

Trang

9 tháng 5 2023

Trình bày cú pháp khai báo biến mảng trong hệ xuân ANATOMY. Áp dụng:Viết câu lệnh khai báo biến mảng lưu điểm TB môn tin của 45 học sinh lớp 9A và viết câu lệnh nhập giá trị cho các phần tử tỏng mảng vừa khai báo GIÚP MIK VS MN MAI MIK THI RỒI

#Tin học lớp 8

1

T

Trang

9 tháng 5 2023

Phần tử trong mảng nha mn ghi nhầm

Đúng(0)

PH

phạm hải nam

14 tháng 3 2022

viết chương trình nhập vào 1 mảng gồm n phần từ bàn phím . tính tổng các phần tử trong mảng .in kết quả ra màn hình.

-khai báo biến biến mảng .

-nhập n số phần tử mảng ,

-nhập mảng ,

-in mảng.

-tính tổng ,

-in kết quả ra màn hình

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

14 tháng 3 2022

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,t;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

t=0;

for (i=1; i<=n; i++) t+=a[i];

cout<<t;

return 0;

}

Đúng(0)

NK

Nguyễn Kim Trí

22 tháng 1 2022

Bài tập 3. Nhập vào một mảng số nguyên và in ra các phần tử là số nguyên tố có trong mảng.

- Viết các lệnh:

+ Nhập, Xuất dữ liệu

+ Khai báo biến

+ Câu lệnh điều kiện

+ Vòng lặp For.. do, While.. do

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

22 tháng 1 2022

#include <bits/stdc++.h>

using namespace std;

long long a[1000],n,i;

//chuongtrinhcon

bool ktnt(long long x)

{

if (x<=1) return(false);

for (int i=2; i*i<=x; i++)

if (x%i==0) return(false);

return(true);

}

//chuongtrinhchinh

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) if (ktnt(a[i])==true) cout<<a[i]<<" ";

return 0;

}

Đúng(0)

HT

hạnh trần

4 tháng 5 2021

viết chương trình thực hiện yêu cầu sau khai báo biến mảng tên là B gồm tối đa 25 phần tử, các phần tử có kiểu là số nguyên,sau đó nhập dữ liệu từ bàn phím vào mảng ?

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

4 tháng 5 2021

uses crt;

var b:array[1..25]of integer;

i,n:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('B[',i,']='); readln(b[i]);

end;

readln;

end.

Đúng(0)

BT

Bảo thy

5 tháng 5 2022

Câu 1: viết cú pháp khai báo mảng trong pascal Câu 2: khai báo mảng c gồm 20 phần tử kiểu số thực

#Tin học lớp 8

1

KV

Kiều Vũ Linh

5 tháng 5 2022

Câu 1: Cú pháp khai báo mảng trong pascal:

Var <tên mảng>:array[1..n] of <kiểu dữ liệu>;

Cây 2: Khai báo mảng c gồm 20 phần tử kiểu số thực:

Var c:array[1..20] of real;

Đúng(0)

VH

Vũ Hạ Linh

7 tháng 5 2021

Câu 1 : hãy viết các câu lệnh trong pascal thực hiện các yêu cầu sau a) Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực b) Phần tử thứ năm của mảng A được gắn giá trị là 8 c) Viết câu lệnh lặp nhập giá trị cho 50 phần tử trong mảng A và in ra màn hình giá trị của 50 phần tử đã nhậpCâu 2: Viết chương trình tính tổng 10 số tự nhiên đầu tiênCâu 3: Cho mảng A chứa các giá trị...

Đọc tiếp

#Tin học lớp 8

3

NL

Nguyễn Lê Phước Thịnh

7 tháng 5 2021

Câu 1:

a) var a:array[1..50]of real;

b) a[5]:=8;

c) for i:=1 to 50 do

begin

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

end;

for i:=1 to 50 do

write(a[i]:4);

Đúng(1)

NL

Nguyễn Lê Phước Thịnh

7 tháng 5 2021

Câu 2:

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do

s:=s+i;

writeln(s);

readln;

end.

Đúng(1)

Q

Quanh

25 tháng 4 2023

Viết chương trình khai báo mảng m có 50 phần tử kiểu Nguyên. Nhập các phần tử từ bàn phím và thực hiện tính tổng các phần tử đã nhập in ra kết quả tổng tính được và các phần tử đã nhập.

#Tin học lớp 11

1

NB

Ngô Bá Hùng

25 tháng 4 2023

program TinhTongPhanTuMang;
var
i, tong: integer;
m: array[1..50] of integer;

begin
for i := 1 to 50 do
begin
writeln('Nhap ptu thu ', i, ': ');
readln(m[i]);
end;
tong := 0;
for i := 1 to 50 do
begin
tong := tong + m[i];
end;
writeln('Tong cac ptu trong mang la: ', tong);
writeln('Cac ptu trong mang la:');
for i := 1 to 50 do
begin
writeln(m[i]);
end;
end.