Viết câu lệnh thực hiện yêu cầu sau: 1. Khai báo mãng 1 chiều gồm 10 phần tử số nguyên dương trong phạm vi [500..10000] 2. Nhập mãng 1 chiều khai báo ở câu 1 3. In mãng 1 chiều nhập câu 2
Viết câu lệnh thực hiện yêu cầu sau: 1. Khai báo mãng 1 chiều gồm 10 phần tử số nguyên dương trong phạm vi [500..10000] 2. Nhập mãng 1 chiều khai báo ở câu 1 3. In mãng 1 chiều nhập câu 2 4. Với dữ liệu câu 2, yêu cầu tính và in ra màn hình: 4a. Tổng các số chẵn 4b. Đếm các số lẽ 4c. Tích các số chia hết cho 2 hoặc 3
#include <bits/stdc++.h>
using namespace std;
long long a[10],i,n,t1,dem1,s;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) cout<<a[i]<<" ";
cout<<endl;
t1=0;
dem1=0;
s=1;
for (i=1; i<=n; i++)
{
if (a[i]%2==0) t1+=a[i];
else dem1+=1;
if ((a[i]%2==0) or (a[i]%3==0)) s=s*a[i];
}
cout<<t1<<endl;
cout<<dem1<<endl;
cout<<s;
return 0;
}
Viết câu lệnh thực hiện yêu cầu sau:
1. Khai báo mãng 1 chiều gồm 10 phần tử số nguyên dương trong phạm vi [500..10000]
2. Nhập mãng 1 chiều khai báo ở câu 1
3. In mãng 1 chiều nhập câu 2 4. Với dữ liệu câu 2, yêu cầu tính và in ra màn hình:
4a. Tổng các số chẵn
4b. Đếm các số lẽ 4c. Tích các số chia hết cho 2 hoặc 3
#include <bits/stdc++.h>
using namespace std;
long long a[10],i,t,dem;
int main()
{
for (i=1; i<=10; i++) cin>>a[i];
t=0;
dem=0;
for (i=1; i<=10; i++)
{
if (a[i]%2==0) t=t+a[i];
else dem++;
}
for (i=1; i<=10; i++) cout<<a[i]<<" ";
cout<<endl;
cout<<t<<endl;
cout<<dem;
return 0;
}
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 tổng S=1+2+..+n (bằng lệnh while) Giúp mình với đang cần gấp :
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ập
Câu 2: Viết chương trình tính tổng 10 số tự nhiên đầu tiên
Câu 3: Cho mảng A chứa các giá trị sau
A | 17 | 13 | 20 | 10 | 15 |
I | 3 | 7 | 5 | 6 | 7 |
a) Xác định các giá trị của A[2];A[4];A[7];A[9] là bao nhiêu
b) Cho các câu lệnh sau:
A[2]:= A[3] + A[5];
A[9]:= A[6] + A[7];
Dựa vào bảng trên hãy tính giá trị các phần tử A[2], A[9]
Giúp em với ạ chiều nay thi rồi huhu
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);
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.
Yêu cầu: Dựa vào nội dung Bài 1/ sách giáo khoa Tin học 8, trang 34 – 35, hãy hoàn thành các câu hỏi sau: 1/ Chương trinh cần khai báo những biển, hằng nào? Hãy khai báo các biến, hằng đó. 2/ Viết câu lệnh yêu cầu nhập Đơn giá? Viết câu lệnh nhập Đơn giá từ bàn phím? 3/ Viết câu lệnh yêu cầu nhập Số lượng? Viết câu lệnh nhập Số lượng từ bàn phím? 4/ Viết câu lệnh gắn giá trị thành tiền theo công thức: Tiền thanh toán = Đơn giá x Số lượng + Phí dịch vụ; 5/ Viết câu lệnh in giá trị thành tiền ra màn hình.
viết chương trình
-nhập mãng n phần tử
-in mãng
-sắp xép các phần tử tăng dần
-in kết quả sau khi sắp xếp
n=6
cac số:3,5,1,4,2,6
mảng 1 2 3 4 5 6
uses crt;
var g:array[1..5]of integer;
i,vtc,vtl:integer;
begin
clrscr;
for i:=1 to 5 do
begin
write('G[',i,']='); readln(g[i]);
end;
vtc:=0;
vtl:=0;
for i:=1 to 5 do
begin
if g[i] mod 2=0 then
begin
if vtc<i then vtc:=i;
end
else begin
if vtl<i then vtl:=i;
end;
end;
writeln('Vi tri phan tu le cuoi cung la: ',vtl);
writeln('Vi tri phan tu chan cuoi cung la: ',vtc);
readln;
end.
nhập mã gồm n số nguyên từ bàn phím , xuất mãng vừa nhập , tính tổng các ptu của mãng , tính tổng các ptu là số âm,dương có trong mãng
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i,t1,t2,t3;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=1; i<=n; i++) cout<<a[i]<<" ";
cout<<endl;
t1=0;
t2=0;
t3=0;
for (i=1; i<=n; i++)
{
t1+=a[i];
if (a[i]<0) t2+=a[i];
if (a[i]>0) t3+=a[i];
}
cout<<t1<<endl;
cout<<t2<<endl;
cout<<t3;
return 0;
}
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
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;