Ну, вот на Pascal написал. Вроде так...
var
Sum, I : integer;
Sum := 0;
I := 45;
While I >= M do
begin
Sum := Sum + I;
I := I - 3;
end;
Writeln(Sum);
end.
Объяснение:
ответ: Восприятие объектов по его свойствам - ощущение.
Объяснение: восприятие - это целостное отражение объекта, непосредственно воздействующего на наши органы чувств. Оно складывается из отдельных ощущений. Предположим, вас угостили яблоком. С глаз вы воспринимаете его форму и цвет; с языка определяете, кислое оно или сладкое; с носа ощущаете его аромат.
В результате создаётся целостное отражение этого объекта. Но восприятие одного и того же объекта разными людьми может быть различным.
Так, скорее всего, взглянув на зелёный луг, художник восхитится его красотой, формой и красками, биолог увидит различные виды растений, а крестьянин прикинет, сколько с него можно получить сена.
Из этого примера видно, что восприятие каждого человека очень сильно переплетается с его прежними опытом и знаниями.
Begin
Read(a);
Sum:=45;
I:=45;
While i>a do
Begin
I:=i-3;
Sum:=sum+i;
End;
Write(sum);
End.
Объяснение: