Y=0, 5+√x2+1-tg2(x2+1), найти среднее арифметическое отрицательных значений функции . исходные данные xmin- 1, 5, xmax-2, 3, ∆x-0, 1

#include < iostream> using namespace std; int main() {     for (int a=1; a< =9; a++) {       for (int b=1; b< =9; b++) {         for (int c=1; c< =9; c++) {           for (int d=1; d< =9; d++) {               if ==5) & (b==5)) || ((a==5)& (c==5)) || ((a==5)& (d==5)) || ((b==5)& (c==5))   || ((b==5)& (d==5)) || ((c==5)& (d== cout< < a< < b< < c< < d< < endl; } } } }return 0; }

Вам вряд  ли задали так сделать, но всё же. var a,b: integer; d: string;   begin    writeln  (' введи число');       readln(b);     str (b, d);       for a: =length(d) downto 1 do begin        write(d[a]);     end;   writeln(''); end. лучше так напиши. var a,b,c: integer; begin write('введите число=>   '); readln(a); write('обратное число=>   '); while (a< > 0) do begin b: =a mod 10; write(b); a: =a div 10; end; end.