C++ :

#include <iostream>
#include <cstdio>
using namespace std;
int main()
{
    int n,max;
    cin>>max;
    cin>>n;
    if(n>max)
    {
        max=n;
    }
    cin>>n;
    if(n>max)
    {
        max=n;
    }
    cout<<max<<endl;
    return 0;
}

Pascal :

var a,b,c:integer;
begin
    read(a,b,c);
    if (a>b) and (a>c) then
    begin
        write(c);
    end
    else
    begin
        if b>c then
        begin
            write(b);
        end
        else
        begin
            write(c);
        end;
    end;
end.