Viết các câu lệnh sau:
- Nhập dữ liệu cho phần tử thứ 15 của mảng.
- Gán giá trị 8,5 cho phần tử thứ 3 của mảng.
- Xuất giá trị của phần tử thứ 18 của mảng ra màn hình.
Viết các câu lệnh sau:
- Nhập dữ liệu cho phần tử thứ 15 của mảng.
- Gán giá trị 8,5 cho phần tử thứ 3 của mảng.
- Xuất giá trị của phần tử thứ 18 của mảng ra màn hình.
-----------
help me! Tớ đang cần rất gấp mai thi rồi...
Lời giải :
- Readln(a[15]);
- a[3]:=8,5;
- write('a[18]='); readln(a[18]);
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.
viết câu lệnh cho mảng A( số nguyên )
a) gán phần tử thứ 2 là 100 thứ 5 là 150
b) tăng giá trị cho phần tử thứ 1,3 lên 2 đơn vị
c) gán phần tử thứ 1,3 của mảng A và phần tử thứ 1,3 của mảng A và phần tử thứ 2 và 4 của mảng B
b) a[1]:=a[1]+2;
a[3]:=a[3]+2;
hãy viết câu lệnh,khai báo theo yêu cầu sau:
a.khai báo mảng a có tối đa 50 phần tử thuộc kiểu dữ liệu số thực
b.phần tử thứ 5 của mảng a được gán giá trị là 8
c.nhập giá trị cho phần tử thứ 2 trong mảng a
d. nếu số a ko chia hết cho 2 thì số đó là số lẻ
a) var a:array[1..50]of real;
viêt các câu lệnh theo yêu cầu. a, khai tên báo biến mảng cannang, với chỉ số đầu là 10, chỉ số cuối là 100,kiểu dữ liệu số thực. b, viết lệnh gán giá trị 20 cho phần tử thứ 7 của mảng A
a) var cannang:array[10..100] of real;
b) a[7]:=20;
1. Khai báo biến mảng B được đánh thứ tự từ thứ 5 đến thứ 95, mọi phần tử biến số thực.
2. Nhập dữ liệu cho phần tử thứ 10 đến 20 của mảng B.
3. Xuất giá trị của 50 phần tử thứ 5 của mảng B.
1: var b:array[5..95]of real;
2: for i:=10 to 20 do
begin
write('B[',i,']='); readln(b[i]);
end;
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 giá trị các phần tử là các số nguyên đưa ra màn hình mảng vừa nhập với thứ tự các phần tử ngược lại, nhập 3, 6, 8 đưa ra 8, 6, 3. Đếm số phần tử có giá trị lớn hơn 10. Đưa ra màn hình số lượng số nguyên tố trong mảng
#include <bits/stdc++.h>
using namespace std;
int A[500],n,i,dem,dem1;
int main()
{
cin>>n;
for (int i=1; i<=n; i++) cin>>A[i];
for (int i=n; i>=1; i--) cout<<A[i]<<" ";
cout<<endl;
dem=0;
for (int i=1; i<=n; i++)
if (A[i]<10) dem++;
cout<<dem<<endl;
dem1=0;
for (int i=1; i<=n; i++)
if (A[i]>1)
{
bool kt=true;
for (int j=2; j*j<=A[i]; j++)
if (A[i]%j==0) kt=false;
if (kt==true) dem1++;
}
cout<<dem1;
return 0;
}
Câu 1: Khai báo biến mảng có tên bất kỳ gồm 10 phần tử. Mỗi phần tử lưu tên mỗi học sinh.
Câu 2: Giả sử có mảng có tên là A gồm 10 phần tử, viết lệnh để gán giá trị phần tử thứ nhất có giá trị là 4, phần tử thứ 10 có giá trị là 16.
Giúp mk với !!!