S=((a1+a90)/2)*n=54.5*90=4095
Который раз повторяю, указывайте на каком языке нужно писать программу. По классике написала на Pascal:
program ff;
var
x : integer;
begin
Write('Введите число ');
Readln(x);
if x mod 2 = 0 then writeln(x/2)
else writeln(sqr(x));
end.
Я так понимаю, мах слово - выводить на экран вместе с числом.
var a,b,c:integer;
begin
readln(a,b,c);
if (a>b) and (a>c) then write('max = ', a)
else
if (b>a) and (b>c) then write('max = ', b)
else write('max = ', c);
end.
<span>решение некраткое и понятное с объяснениями поподробное!</span>
Var x,y:real; n:integer;
function f(x:real;n:integer):real;
var i,st:integer;
begin
st:=1;
for i:=1 to n do st:=st*2;
f:=sin(x)*st;
end;
begin
writeln('x, n:');
readln(x,n);
y:=f(x,n);
writeln('x = ',x,' y = ',y);
end.
Пример:
x, n:
2 5
x = 2 y = 29.0975176584218