Вот программа , если мы хотим сложить 2 квадрата одного числа program sqr; var n,a: integer; begin write ('Введите число>>'); read (n); a:= n*n+n*n; writeln (a) end.
Но если мы хотим выразить 1 число в виде суммы 2-х квадратов и проверить возможно ли это, то (боюсь ошибиться) program sqr; uses crt; var n: integer; a,b:real; begin write ('Введите число>>'); read (n); a:= sqrt(n); if (a= sqrt(n)) and (a=(n*n)) then begin b:= sqrt(a); if b= (a*a)+(a*a) then writeln ('Можно'); if b<> (a*a)+(a*a) then writeln ('Нельзя'); end; if (a= sqrt(n)) and (a<>n*n) then writeln ('Нельзя') end.
program sqr;
var n,a: integer;
begin
write ('Введите число>>');
read (n);
a:= n*n+n*n;
writeln (a)
end.
Но если мы хотим выразить 1 число в виде суммы 2-х квадратов и проверить возможно ли это, то (боюсь ошибиться)
program sqr;
uses crt;
var n: integer; a,b:real;
begin
write ('Введите число>>');
read (n);
a:= sqrt(n);
if (a= sqrt(n)) and (a=(n*n)) then
begin
b:= sqrt(a);
if b= (a*a)+(a*a) then
writeln ('Можно');
if b<> (a*a)+(a*a) then
writeln ('Нельзя');
end;
if (a= sqrt(n)) and (a<>n*n) then
writeln ('Нельзя')
end.
#include <math.h>;
using namespace std;
int main(int argc, char* argv[])
{
setlocale(LC_ALL, "Russian");
double x1,x2,y1,y2,distance;
cout <<"Введите координату x1:";
cin>>x1;
cout <<"Введите координату y1:";
cin>>y1;
cout <<"Введите координату x2:";
cin>>x2;
cout <<"Введите координату y2:";
cin>>y2;
distance=sqrt(pow((x2-x1),2)+pow((y2-y1),2)); // формула для вычисления расстояния
cout<<"Расстояние между двумя точками:"<<distance<<endl;
system("pause");
}