Помогите пожалуйста решить задачу с помощью паскаля.1.-Выбрать наибольшее из двух…

1) var i, a: integer; begin readln (i, a); if (i < a) then writeln (i, ' < ', a) else if (i=a) then writeln (i, '=', a) else writeln (i, ' > ', a); end.2) var i, a: integer; begin for i: =1 to 100 do a: =a+i*i*i; writeln (a); end. Удачи тебе: 3