cho dãy số nguyên A gồm 10 phần tử. Viết đoạn lệnh nhập giá trị ngẫu nhiên cho A
2 câu trả lời
uses crt;
var n,i,d : integer;
a : array[1..100] of longint;
begin clrscr;
randomize;
for i:=1 to 10 do begin a[i]:=random(100)-random(100);
writeln(a[i]); end;
readln
end.
* Đoạn lệnh nhập gía trị cho A:
var A:array[1..10] of integer;
i:integer;
begin clrscr;
for i:= 1 to 10 do
begin
write('Nhap phan tu thu ',i,': '); readln(A[i]);
end;
Học tốt!
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
