Начнем: ( 1; 8; 15 ) ( 15; 8; 1 ) ( 4; 30; 56 ) (56; 30; 4 ) и так далее ... (Здесь мы не брали трехзначные числа...)
А вот и программа на PascalABC:
var x, y, z : real; begin for var a:=1 to 99 do for var b:=1 to 99 do for var c:=1 to 99 do begin if b=(a+c)/2 then begin x:=sqrt(a*b+1); y:=sqrt(b*c+1); z:=sqrt(c*a+1); if (int(x) = (x)) and (int(y) = (y)) and (int(z) = (z)) then WriteLn(a:4,b:4,c:4); end; end; end.
Парадный портрет - предусматривает изображение человека в полный рост (стоя, либо сидя на коне). В парадном портрете персона представлена на фоне пейзажа либо архитектурного сооружения. Парадными портретами украшают залы. На них изображаются люди в полный рост в красивых костюмах, в богатой обстановке.
Камерный портрет – персона, представлена на нейтральном фоне, изображена по пояс, по грудь, либо по плечи. Разновидностью камерного изображения с нейтральным фоном является интимный портрет, выражающий доверительные отношения между художником и портретируемой особой. В них больше передается не значимость человека, а его внутренний мир и характер.
Начнем:
( 1; 8; 15 )
( 15; 8; 1 )
( 4; 30; 56 )
(56; 30; 4 ) и так далее ... (Здесь мы не брали трехзначные числа...)
А вот и программа на PascalABC:
var x, y, z : real;
begin
for var a:=1 to 99 do
for var b:=1 to 99 do
for var c:=1 to 99 do
begin
if b=(a+c)/2 then
begin
x:=sqrt(a*b+1);
y:=sqrt(b*c+1);
z:=sqrt(c*a+1);
if (int(x) = (x)) and (int(y) = (y)) and (int(z) = (z)) then WriteLn(a:4,b:4,c:4);
end;
end;
end.
Камерный портрет – персона, представлена на нейтральном фоне, изображена по пояс, по грудь, либо по плечи. Разновидностью камерного изображения с нейтральным фоном является интимный портрет, выражающий доверительные отношения между художником и портретируемой особой. В них больше передается не значимость человека, а его внутренний мир и характер.