Дано целое число а. если его значение а< > 0, то необходимо уменьшить его на 4. написать программу для решения этой .

Uses crt; var a: integer; begin readln(a); if a< > 0 then a: =a-4; writeln(a); end.

#include < stdlib.h> #include < iostream> #include < iomanip> using namespace std; int main() { const int n = 10; double a[n]; double s=0; int i1=0, i2=n-1; srand(time(0)); for (int i = 0; i < n; i++){ a[i]=-50 + (101.0 / rand_max) * rand(); cout < < fixed < < setw (7) < < setprecision (2) < < a[i]; } cout < < endl; while (a[i1]< =0) i1++; while (a[i2]< =0) i2--; for (int i = i1+1; i < i2; i++) s += a[i];   cout < < "s = " < < s < < endl; } пример: -27.52 34.26 -1.18 -8.80 35.24 6.73 18.42 -34.25 -30.21 44.03s = -14.06

Программа вкратце. если посещал уроки то сможешь ее написать чтоб работала. в условии ошибка, наверное вместо - написал плюс. y = sqrt(х+5). если x> 0. пусть здесь будет так: у= sqrt(5-х). если x< 0 program radical; var x,y: integer; begin readln(x); if ((x+5) > = 0) and ((5-х) > =0))  then begin     { проверка чтобы не-было меньше нуля }     if (x> 0) then          y = sqrt(x+5);     else if (x< 0) then          y = sqrt(5-x);     writeln('результат=', y);       end else      writeln("нельзя извлечь корень из отрицательного числа"); readln(); end.