giúp e lm bài này vs e đg kt 1 tiết viết phương trình nhập độ dài cũng như các phần tử của dãy số chạy chương trình để kiểm tra kết quả với:N=4;các phần tử:1:10;2:14;3:8;4:5

2 câu trả lời

program oken;
uses crt;
var a: array [1..100] of integer;
    n,i: integer;
begin
    clrscr;
    write('Nhap so phan tu cua mang: '); readln(n);
    for i:=1 to n do    
        begin
            write('a[',i,']: ');
            readln(a[i]);
        end;
    readln;
end.

Program Hotboy;

Uses crt;

Var A :array[1..100] of integer;

sn,i : longint;

Begin

Clrscr;

Write('nhap so n');

For i:=1 to n do

Write('A[',i,]');

Readln(A[i]);

Readln

End.

Câu hỏi trong lớp Xem thêm
5 lượt xem
2 đáp án
3 giờ trước
4 lượt xem
2 đáp án
3 giờ trước