ĐỀ 2: Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất

ĐỀ 2: Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất

0 bình luận về “ĐỀ 2: Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất”

  1. program tim_max_min ;

    var i,n,max,min:integer;

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

    begin

    write(‘nhap do dai cua day so n=’);readln(n);

    writeln(‘nhap cac phan tu cua day so :’);

    for i:=1 to n do

    begin

    write(‘a[‘,i,’]=’);readln(a[i]);

    end;

    max :=a[1] ; min:=a[1];

    for i:=2 to n do

    begin

    if max <a[i] then max :=a[i];

    if min >a[i] then min :=a[i];

    end;

    writeln(‘so lon nhat la:’,max);

    writeln(‘so be nhat la:’,min);

    readln

    end.

    chúc bạn học tốt-fewlove

    Bình luận

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