128000 бит/с = 128000/8 байт/с= 16000байт/с ;
500Кбайт=500*1024 байт=512000байт
512000/16000= 32
Ответ. б) 32 с
В языке С/С++ любое ненулевое значение считается истинным.
Цикл с заголовком while (a(x)) выполнятся до тех пор. пока a(x) ненулевое, следовательно, при выходе из цикла a(x)=0.
Первоначально х=1 и если a(1) окажется равным нулю, то тело цикла не выполнится ни разу. В этом случае у будет равен начальному значению, т.е. у=1.
Если же а(1) не равняется нулю, то будет выполняться тело цикла. При у<0 переменная х получает значение 2, у получает значение 10. Мы должны полагать что а(2) ложно и тогда произойдет выход из цикла. Если же это не так, то тело цикла будет выполняться повторно. Ветка при y>=0 дает присваивание х=1, а мы рассматриваем вариант, когда такое значение не приводит к выходу из цикла, следовательно у=20 никогда не будет последним присваиванием значения у. Тогда возможен только вариант ответа 1 (у=1 или 10)
<em><u>Ответ:</u></em> Вариант 1
Ответ:
var
a: array [1..3] of Integer;
i, imin: Integer;
begin
for i := Low (a) to High (a) do begin
Write (i, ' число: ');
ReadLn (a [i]);
end;
imin := 0;
for i := Low (a) to High (a) do begin
if a [i] mod 2 = 0 then
if imin = 0 then
imin := i
else if a [i] < a [imin] then
imin := i;
end;
if imin <> 0 then
WriteLn ('Наименьшее четное = ', a [imin])
else
WriteLn ('Четных чисел нет.');
ReadLn;
end.
