Который раз повторяю, указывайте на каком языке нужно писать программу. По классике написала на Pascal:
program ff;
var
x : integer;
begin
Write('Введите число ');
Readln(x);
if x mod 2 = 0 then writeln(x/2)
else writeln(sqr(x));
end.
-10;-9;-8;-7;-6;-5;-4;-3;-2;-1;0;1;2;3;4;5;6;7;8;9;10.
[-10;10]
|-10|=10; |-9|=9; |-8|=8; |-7|=7; |-6|=6; |-5|=5; |-4|=4; |-3|=3; |-2|=2; |-1|=1; |0|=0; |1|=1; |2|=2
1110,001(2)=1*2^3+1*2^2+1*2^1+0*2^0+0*2^-1+0*2^-2+1*2^-3=8+4+2+0,125=14,125(10)
Var
n, i : longint;
begin
readln(n);
for i:= 2 to n do
if (i mod 2 <> 0) and (i mod 3 = 0) then
begin
write(i);
write(' ');
end;
end;
end.
Begin
Writeln((10+15))*((15-10+1)/2));
End.