- Xuất ra màn hình số lớn nhất trong ba số tự nhiên :

uses crt;

var a, b, c, max : integer;

begin

clrscr;

write('nhap ba so tu nhien : ');

readln(a, b, c);

max := c;

if max < b then max := b;

if max < a then max := a;

writeln('so lon nhat : ', max);

readln

end.

Python:

a=int(input("nhap a: "))
b=int(input("nhap b: "))
c=int(input("nhap c: "))
print("so lon nhat la: ",end='')
print(a) if (a>b and a>c) else print(b) if (b>a and b>c) else print(c)

C/C++:

#include <stdio.h>
int main()
{
    long long a,b,c;
    scanf("%lld %lld %lld",&a,&b,&c);
    long long max=a;
    if (b>max) max=b;
    if (c>max) max=c;
    printf("so lon nhat la: %lld",max);
}

C#:

using static System.Console;
class Daoanhviet96
{
    static void Main()
    {
        long a = long.Parse(ReadLine());
        long b = long.Parse(ReadLine());
        long c = long.Parse(ReadLine());
        long max=a;
        if (b>max) {max=b;}
        if (c>max) {max=c;}
        Write("so lon nhat la: {0}",max);
    }
}

$\color{red}{\text{#Daoanhviet96}}$

***************************************

Nhìn bình luận thấy chữ pascal nhưng không biết pascal => làm đại :>>

uses crt;
var a,b,c,max:longint;
begin
readln(a);
readln(b);
readln(c);
max:=a;
if (b>max) then max:=b;
if (c>max) then max:=c;
write(max);
end.