Begin
writeln(350/2/3*60,' секунд');
<span>end.</span>
В 12-ричной системе счисления.
77 = 7 * 8 + 7 = 63.
53 = 12 * 5 + 3 = 63.
Ответ:
program arrdiap;
var
N, A, B, i: Integer;
M: array of Integer;
begin
Write ('Введите размерность массива: ');
ReadLn (N);
SetLength (M, N);
Randomize;
for i := Low (M) to High (M) do begin
M [i] := Random (100);
Write (M [i], ' ');
end;
WriteLn;
Write ('Введите диапазон A, B: ');
ReadLn (A, B);
WriteLn;
WriteLn ('Принадлежит диапазону ', A, ' - ', B, ':');
for i := Low (M) to High (M) do begin
if (M [i] >= A) and (M [i] <= B) then
Write (M [i], ' ');
end;
ReadLn;
end.
Первый вопрос - первое вложение. Второй - два остальных.
512*240=122880
переводим килобайты в мегабайты
120 МБ)