Viết chương trình nhập từ bàn phím số nguyên N (N<250) dãy số gồm N số nguyên và một số nguyên K ( K >0 ) viết ra màn hình dãy số tương ứng là kết quả của phép chia lấy nguyên( DIV) của từng số với K Nhập cú pháp khai báo biến
1 câu trả lời
uses crt;
var i,n,k:longint; a:array[1..100000]of longint;
begin
clrscr;
write('n(n<250) ,k=');readln(n,k);
for i:=1 to n Do
begin
write('a[',i,']=');readln(A[i]);
end;
for i:=1 to n do write(a[i] div k,' ');
readln
end.
