Приблизительный объем текста в одном из изданий Толкового словаря по информатике 2 мегабайта. Определите количество страницы в этом словаре, если на каждой из них текст расположен в 2 столбика, в каждом из которых 64 строки по 32 символа в строке.​

В прямоугольном треугольнике должна выполняться теорема Пифагора. Найдем самую длинную строну и проверим, является ли квадрат ее длины суммой квадратов длин двух других сторон. Для того, чтобы избежать ошибок округления примем, что все длины - натуральные числа.

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (a,b,c):=ReadReal3('Введите через пробел или Enter стороны:');
  if a>c then Swap(a,c);
  if b>c then Swap(b,c);
  if c*c=a*a+b*b then Writeln('Треугольник прямоугольный')
  else Writeln('Треугольник не прямоугольный')
end.

Пример
Введите через пробел или Enter стороны: 6 8 10
Треугольник прямоугольный

1)#include <iostream>

using namespace std;

int main() {

 int a=1,b=1,c=0,d=1;

 int otvet=a*(-1)+b^c-d;

 cout<<otvet;

}

2)#include <iostream>

using namespace std;

int main() {

 int a = 1, b = 1, c = 1, d = 1;

 int otvet=a*(-1)+b^c-d;

 cout<<otvet;

}

3)#include <iostream>

using namespace std;

int main() {

 int a = 0, b = 0, c = 0, d = 0;

 int otvet=a*(-1)+b^c-d;

 cout<<otvet;

}

4)#include <iostream>

using namespace std;

int main() {

 int a = 0, b = 1, c = 1, d = 0;

 int otvet=-(a+b^c+(-b))+a^d;

 cout<<otvet;

}

5)#include <iostream>

using namespace std;

int main() {

 int a = 1, b = 0, c = 0, d = 1;

 int otvet=-(a+b^c+(-b))+a^d;

 cout<<otvet;

}

6)#include <iostream>

using namespace std;

int main() {

 int a = 1, b = 1, c = 1, d = 1;

 int otvet=-(a+b^c+(-b))+a^d;

 cout<<otvet;

}

7)#include <iostream>

using namespace std;

int main() {

 int a = 0, b = 0, c = 0, d = 0;

 int otvet=-(a+b^c+(-b))+a^d;

 cout<<otvet;

}

Объяснение: