Язык программирования с++. 1. даны четыре действительных числа a, b, c, x. выяснить, пройдёт ли кирпич со сторонами a, b, c, в круглое отверстие радиуса x? 2. дано трёхзначное натуральное число. найти сумму цифр этого числа. 3. в данном двузначном натуральном числе подсчитать, сколько цифр больших 6, но меньших 9. 4. даны три действительных числа больших нуля. выяснить, являются ли они сторонами прямоугольного треугольника?

№1 #include < iostream> using namespace std; int main () { setlocale (0,"russian"); float a,b,c,x; cout < < "размеры кирпича: " < < endl; cout < < "a="; cin > > a; cout < < "b="; cin > > b; cout < < "c="; cin > > c; cout < < "радиус круга: "; cin > > x; if ((a< x || b< x) & & c< x) cout < < "кирпич пройдёт."; else cout < < "кирпич не пройдёт."; system ("pause> > void"); return 0; } №4 #include < iostream> using namespace std; int main () { setlocale (0,"russian"); float a,b,c; cout < < "стороны треугольника: "; cin > > a > > b > > c; if (a< =0 || b< =0 || c< =0) { cout < < "неверно введены стороны (они не могут быть отрицательными)! "; } else { if (c> a & & c> b) { if (c==sqrt(a*a+b*b)) cout < < "треугольник прямоугольный."; else  cout < < "треугольник непрямоугольный"; } else if (a> b & & a> c) { if (a==sqrt(c*c+b*b)) cout < < "треугольник прямоугольный."; else  cout < < "треугольник непрямоугольный"; } else { if (b==sqrt(c*c+a*a)) cout < < "треугольник прямоугольный."; else  cout < < "треугольник непрямоугольный."; } } system ("pause> > void"); return 0; }

var a, b: real; n: integer;

function arif_mem(a, b: real; n: integer): real; begin if n = 1 then arif_mem : = a; if n > 1 then arif_mem : = arif_mem(a, b, n - 1) + b; end;

function arif_sum(a, b: real; n: integer): real; begin if n = 1 then arif_sum : = a; if n > 1 then arif_sum : = arif_sum(a, b, n - 1) + arif_mem(a, b, n); end;

begin write('введите первый член прогрессии: '); readln(a); write('введите разность прогрессии: '); readln(b); write('введите номер члена прогрессии: '); readln(n); writeln(n, '-й член прогрессии равен : ', arif_mem(a, b, n): 8: 2); writeln('сумма ', n, ' членов прогрессии равна : ', arif_sum(a, b, n): 8: 2); end.

1)

var 

a,b,c: real;

begin

readln(a,b);

c: =180-a-b;

if (a> 90) or (b> 90) or (c> 90) then writeln('тупоугольный')

else

if  (a=90) or (b=90) or (c=90) then writeln('прямоугольный')

else  writeln('остроугольный');

end.

2)

var

v: real;

begin

readln(v);

if v< 7.8 then writeln ('ракета упадет на землю');

if v=7.8 then  writeln ('ракета станет спутником земли');

if (v> 7.8) and (v< =16.4) then  writeln ('ракета останется в пределах солнечной системы'); if (v> 16.4) then  writeln ('ракета покинет пределы солнечной системы');  

end.