trong khai báo biến mảng , chỉ số đầu và chỉ số cuối được sử dụng với kiểu dữ liệu :
A Char B String C Real D Integer
Bài 9. Làm việc với dãy số
Viết chương trình nhập một mảng số nguyên gồm 5 phần tử. Sau đó tính tích các phần tử là số âm và chia hết cho 2 , rồi in kết quả ra màn hình.
viết chương trình sử dụng biến mảng để nhập một dãy gồm N số nguyên từ bàn phím.In ra màn hình các số nguyên đó. Tính tổng và trung bình cộng của N số đó.
Giúp mình với ạ
program mang;
uses crt;
var
N, i: integer;
a: array[1..100] of integer;
sum, average: double;
begin
clrscr;
write('Nhap so phan tu mang: ');
readln(N);
sum := 0;
for i:= 1 to N do
begin
write('Nhap phan tu thu ', i, ': ');
readln(a[i]);
sum := sum + a[i];
end;
writeln('Cac phan tu cua mang la:');
for i:= 1 to N do
write(a[i], ' ');
average := sum / N;
writeln('Tong cac phan tu cua mang la: ', sum:0:2);
writeln('Trung binh cong cua mang la: ', average:0:2);
readln;
end.
Đúng 2
Bình luận (0)
viết chương trình nhập mảng A gồm n phần tử và in ra màn hình tổng các số chẵn trong pas cal
Viết Chương trình sử dụng biến mảng nhập vào N số nguyên(N
Câu a : Dãy A gồm n số nguyên được nhập từ bàn phím. Hiển thị các số chia hết cho 2 (3, 5, 7, 9,..) trong dãy A.
program DemSoChan;
var
A: array of Integer;
n, i: Integer;
begin
Write('Nhap so phan tu cua day A: ');
Readln(n);
SetLength(A, n);
for i:= 0 to n-1 do
begin
Write('A[', i, ']= ');
Readln(A[i]);
end;
Writeln('Cac so chan trong day A la:');
for i:= 0 to n-1 do
begin
if A[i] mod 2 = 0 then
Write(A[i], ' ');
end;
end.
Đúng 1
Bình luận (0)
Viết chương trình in ra các số chia hết cho 3 trong phạm vi 1-10
program SoChiaHetCho3;
var
i: Integer;
begin
writeln('Cac so chia het cho 3 trong doan tu 1 den 10 la:');
for i := 1 to 10 do
begin
if i mod 3 = 0 then
write(i, ' ');
end;
end.
Đúng 1
Bình luận (0)
1)viết chương trình nhập vào mảng Diem (lưu điểm kiểm tra giữa HKII của lớp) với n phần tử được nhập từ bàn phím)
in ra mảng đó và tính trung bình cộng điểm giữa HKII của lớp đó và in ra các điểm nhỏ hơn 6,5
2) viết chương trình nhập mảng Diem (lưu điểm kiểm tra giữa HKII của 1 lớp)
in ra điểm cao nhất và vị trí của giá trị đó. Sau đó tính tổng của mảng đó.
Mô tả thuật toán: bài toán cần khai báo những biến nào, xác định kieur dữ liệu của từng biến. VỚi bài toán sắp xếp thì ta cần biến trung gian để làm gì? Sử dụng vòng lặp for lồng nhau so sánh 2 số với nhau để sắp xếp tăng dần. Với toán Tìm Max sử dụng 1 biến Max để gán với giá trị nào ? so sánh giá trị nào? Để tìm ra số lớn nhất ? Trình bày các bước mô tả thuật toán ở dạng liệt kê hoặc sơ đồ khối?
Đọc tiếp
Mô tả thuật toán: bài toán cần khai báo những biến nào, xác định kieur dữ liệu của từng biến. VỚi bài toán sắp xếp thì ta cần biến trung gian để làm gì? Sử dụng vòng lặp for lồng nhau so sánh 2 số với nhau để sắp xếp tăng dần. Với toán Tìm Max sử dụng 1 biến Max để gán với giá trị nào ? so sánh giá trị nào? Để tìm ra số lớn nhất ? Trình bày các bước mô tả thuật toán ở dạng liệt kê hoặc sơ đồ khối?
Cho 1 mảng B gồm n số nguyên (0<N<200)
(đếm xem có bao nhiêu số lẻ vừa nhập vào mảng
Tính trung bình cộng các số lẻ vừa nhập
Kiểm tra xem có bao nhiêu số vừa chia hết cho 3 và chia hết cho 5
Giúp em với mng