viết 1 chương trình thục hiện các yêu cầu sau a, nhạp vào dãy n số tự nhiên bất kì nhỏ hơn 100 từ ban phím

viết 1 chương trình thục hiện các yêu cầu sau a, nhạp vào dãy n số tự nhiên bất kì nhỏ hơn 100 từ ban phím

0 bình luận về “viết 1 chương trình thục hiện các yêu cầu sau a, nhạp vào dãy n số tự nhiên bất kì nhỏ hơn 100 từ ban phím”

  1. uses crt;

    var a: array[1..100] of integer;

    i,n: byte;

    begin

    clrscr;

    write (‘nhap n: ‘);   readln (n);

    for i:=1 to n do

    begin

    write (‘nhap phan tu thu ‘,i,’: ‘);  readln (a[i]);

    end;

    writeln (‘day vua nhap la: ‘);

    for i:=1 to n do write (a[i],’  ‘);

    readln;

    end.

    Bình luận

Viết một bình luận