 
                                                 
                                                 
                                                const
pi=3.14159265358979;
var
a,b,c:integer;
cos1,cos2,cos3:real;
begin
repeat
write ('A = ');readln(a);
write ('B = ');readln(b);
write ('C = ');readln(c);
if (a+b<=c) or (a+c<=b) or (b+c<=a) then writeln ('The triangle doesnt exist');
until (a+b>c) and (a+c>b) and (b+c>a);
cos1:=((a*a+b*b-c*c)/(2*a*b))*180/pi;
cos2:=((a*a+c*c-b*b)/(2*a*c))*180/pi;
cos3:=((b*b+c*c-a*a)/(2*b*c))*180/pi;
if (cos1=0) or (cos2=0) or (cos3=0) then writeln ('Прямоугольный') else
if (cos1<0) or (cos2<0) or (cos3<0) then writeln ('Тупоугольный') else
writeln ('Остроугольный');
readln;
end.
 
                                                Program Zilly;
uses crt;
const n=10;
var
  a,b,c:real;
  tup,pryam:integer;
begin
 writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  tup:=0;
  pryam:=0;
  writeln('Введите стороны треугольника'); 
  write('А = '); readln(a);
  write('B = '); readln(b);
  write('C = '); readln(c);
  a:=a*a;
  b:=b*b;
  c:=c*c;
  if a=b+c then pryam:=1;
  if b=a+c then pryam:=1;
  if c=a+b then pryam:=1;
  if a>b+c then tup:=1;
  if b>a+c then tup:=1;
  if c>a+b then tup:=1;
  if tup=1 then writeln('Треугольник тупоугольный') 
    else
      if pryam=1 then writeln('Треугольник прямоугольный')
         else writeln('Треугольник остроугольный');
end.
 
                                                 
                                                 
                                                 
                                                 
                                                 
                                                 
                                                
#include <iostream>
using namespace std;
void main()
{
int i, n, z=0, k[16], b[15] ;
setlocale(LC_ALL,"rus"); // включаем русский язык
cout<<"Введите размер массива : ";
cin>>n; // вводим размер массива n<=15
for (i=1;i<=n;i++)
{
k[i]=rand()%15; // генерируем и выводим число
cout<<"k [ "<< i <<" ] = "<<k[i]<<endl;
}
cout<<""<<endl;
for (i=1;i<=n;i+=2)
{
z+=1;
b[z]=k[i];
cout<<"b [ "<< z <<" ] = "<<b[z]<<endl;
}
system("pause"); // чтобы консоль не закрывалась мгновенно
}
Тесты :