* Sử dụng mảng:

program ct;

uses crt;

var A:array[1..5] of integer;

      i,min:integer;

begin clrscr;

   for i:=1 to 5 do

     begin

        write('Nhap so thu ',i,': '); readln(A[i]);

     end;

     min:=A[1];

   for i:=1 to 5 do

     if A[i]<min then min:=A[i];

   write('So nho nhat la: ',min);

readln;

end.

* Không sử dụng mảng:

program ct;

uses crt;

var a,b,c,d,e,min:integer;

begin clrscr;

   write('Nhap vao 5 so nguyen: '); readln(a,b,c,d,e);

     min:=a;

   if b<min then min:=b;

   if c<min then min:=c;

   if d<min then min:=d;

   if e<min then min:=e;

   write('So nho nhat la: ',min);

readln;

end.

Học tốt!

Không dùng mảng:

#include <bits/stdc++.h>
using namespace std;
int main() {
    int x=0,y,n=0;
    while(n<5){
        cin>>y;
        if(x<y){
            x=y;
        }
        n++;
    }
    cout<<"So lon nhat trong 5 so la: "<<x;
    //samon247
    return 0;
}

Dùng mảng:

#include <bits/stdc++.h>
using namespace std;
int main() {
    int arr[5],x=0;
    for(int i=0;i<5;i++){
        cin>>arr[i];
    }
    for(int i=0;i<5;i++){
        if(x<arr[i]){
            x=arr[i];
        }
    }
    cout<<"So lon nhat trong 5 so la: "<<x;
    //samon247
    return 0;
}