Посчитать значений выражений “N=a2-5/a+4 Смотрите фото ” 5 раз. Сравнить 2 числа и вывести на экран, наибольшее из них

1. Посчитать значений выражений "N=a2-5/a+4 (Смотрите фото) " 5 раз.

2. Сравнить 2 числа и вывести на экран, наибольшее из них.

    end.

    var a,b:integer;

  • 1)var a,n,c:integer;

     

    begin
    writeln('Введите число');

     

    for c:=1 to 5 do begin n:=a2-5/a+4
    writeln(n);

    begin
    writeln('Введите числа');

    end.

    readln;

    readln(a,b);

     

    readln;

    if (a>b) then writeln(a) else
    writeln(b);

     

    end;

     

  •  

    readln(a);


See also: