Информатика. пишу программу пишет ошибку. не могу понять что не так? подскажите что нужно сделать? Даю 20б

var
n1,n2,n3:integer;
begin
write('Ввод n1,n2,n3,');
read (n1,n2,n3);
if (n1n3)
then max:=n1 else begin if n2>n3
then buf:=n2; min:=n3 else buf:=n3;min:=n2
else begin if(n2>n1) and (n2>n3)
then max:=n2 begin if n1>n3 then
buf:=n1;min:=n3 else buf:=n3;min:=n1
else begin if n1>n2
then buf:=n1;min:=n2
else buf:=n2;min:=n1;
end;
end;
end;
end;
end.
.

                                     PascalABC.NET                                       beginvar n := ReadInteger('Введите количество резисторов:');var Rs := ReadArrInteger('Введите их сопротивления:',n);Writeln(NewLine, 'Общее сопротивление цепи равно:');Println(' при последовательном соединении -', Rs.Sum,'Ом');Println(' при параллельном соединении -', 1/Rs.Sum(r->1/r),'Ом');end.

или кратко:

beginvar Rs := ReadArrInteger(3);Println('послед:', Rs.Sum);Println('парал:', 1/Rs.Sum(r->1/r));end.

Пример работы:

package testStudentCode;

//import java.util.Arrays;

import java.util.Scanner;

public class TestStudentCode {

public static void main(String[] args) {

/* This reads the input provided by user

        * using keyboard

        */

       Scanner scan = new Scanner(System.in);

       System.out.print("a = ?");

       // This method reads the number provided using keyboard

       double a = scan.nextDouble();

       System.out.print("b = ?");

       double b = scan.nextDouble();

       // Closing Scanner after the use

       scan.close();

       System.out.println(a + "x + (" + b + ") = 0");  

       if (a == 0) {

        System.out.println("a = 0");

       } else {

           double x = - b / a;

        System.out.println("x = " + x);

       }

}

}

Объяснение:

как то так