Hogy kell a Turbo Pascal nevü programmal olyan műveletet csinálni, amivel kiírja hogy melyik szám a nagyobb?

ha azt szeretnéd írjuk le pontosan a választ akk neked illene pontosan a kérdést mert nem világos hogyan szeretnéd..

Ha tömbben vannak a számok akkor szvsz így:

var tomb : array[0..10] of integer;

var tombelemszama : integer;

var legnagyobb : integer;

legnagyobb := 0;

tombelemszama := 10; //array[0..10]

for i := 0 to tombelemszaba do

begin

if tomb[i]>legnagyobb then legnagyobb := tomb[i];

end;

showmessage( 'Ez a legnagyobb szám: ' + inttostr(legnagyobb));

var a,b,c: integer;

begin

a := 1;

b := 2;

if (a > b) then

c := a

else

c := b;

WriteLn(c);

ReadKey;

end.

Ja, az "a" és "b" változók helyére kellenek az eldöntendő számok.