на каком языке нужна программа? пример на paskal: program zadacha; var massiv: array [1..15] of integer; i: byte; massiv2: array [1..15] of real; begin randomize; write('isxodnij massiv: '); for i: =1 to 15 do begin massiv: =random(41)-20; write(massiv,' '); end; writeln; writeln('massiv posle preobrazovanij: '); for i: =1 to 15 do begin if massiv=0 then massiv2: =massiv else if massiv mod 5 = 0 then massiv2: =massiv*2 else begin massiv2: =massiv; massiv2: =massiv2/2; end; write(massiv2: 0: 1,' '); end; readln; end.
Ответ дал: Гость
var
x,y: real;
begin
x: =-1;
while x< =1 do
begin
y: =x*x*x;
writeln(y);
x: =x+0.1;
end;
end.
Ответ дал: Гость
в десятичной:
45 = (4*8)^1 + (5*8)^0 = 32 + 1 = 33
106 = (1*8)^2 + (0*8)^1 + (6*8)^0 = 64 + 1 = 65
в двоичной:
45 = 101101
106 = 1101010
Ответ дал: Гость
лексикогрфический порядок: сравниваются первые буквы, если они однаковы, то вторые, третьи и т.д.
Популярные вопросы