אלגוריתם גרפי

[DvirCohen]

חח..עד כמה שאני זוכר פסקל מהיחידה שעשיתי זה צריך להיות משהו כזה

Program ex1;
var
  n1: interger;
  in2: integer;
  in3: integer;
begin 
  Readln( n1, n2, n3 );
  if n1 > n2 && n1 > n3 then
     Writln( n1 )
  else
    if n2 > n1 && n2 > n3 then
      Writln( n2 )
    else
      Writeln( n3 );
end.

אני ממש לא בטוח לגבי זה..
מה אתם לומדים פסקל בכלל? השפה הזאת מתה