1. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=1; while i<=... do begin writeln('Привет!'); i:=i+1 end; ответ: 8 2. Сколько раз будет выполнен этот цикл? i:=2; while i<5 do begin writeln('Привет!'); i:=i+1 end; ответ: 3 3. Какое число будет выведено на экран в результате выполнения этого цикла? i:=5; write('9'); while i<5 do begin write(i); i:=i+1 end; ответ: 5 4. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=7; while i>=... do begin writeln('Привет!'); i:=i-1 end; ответ: введите число 5. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=...; while i>=2 do begin writeln('Привет!'); i:=i-1 end; ответ: введите число 6. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=...; while i<=5 do begin writeln('Привет!'); i:=i+1 end; ответ: введите число 7. Чему будет равно значение переменной a после выполнения этого цикла? i:=4; a:=12; while i<6 do begin a:=a+i; i:=i+1 end; ответ: введите число

Информатика

Ответить

Ответы

Мария

31.01.2021

1) ответ: 2

2) ответ: 3

3) ответ: 9

4) ответ: 6

5) ответ: 3

6) ответ: 4

7) ответ: 21

Mydariamiro

31.01.2021

var s : string[50];
i, j, k : word;
f : boolean;
function isSpace(ch : char) : boolean;
begin isSpace := false;
if ch = ' ' then isSpace := true;
end;
begin f := false;
repeat j := 0;
  writeln('введите строку, состоящую из 2 слов');
  readln(s);
for i := 1 to length(s) do
if isSpace(s[i]) then
  begin
inc(j);
k := i; end;
if j =1 then f := true;
  until f;
write(copy(s, k + 1, length(s)), ' ', copy(s, 1, k - 1));
end.
недавно такую писала :)

vuyakovleva

31.01.2021

Задание 1
Информационный объем I = 44100 Гц * 5 * 60 с * 16 бит = 211680000 бит = 26460000 байт = 25839,84375 Кбайт = 25,23422241210938 Мбайт

Задание 2
I = 1,3 Мбайт t = 1 мин Частота дискретизации v = 1,3 * 1024 * 1024 * 8 бит / 60 с / 8 бит = 22719,147 Гц

Задание 3
I = 5.1 Мбайт, t = 2 минуты, v = 22050 Гц Разрядность аудиоадаптера i = 5.1 * 1024 * 1024 * 8 бит / (2 * 60) с / 22050 Гц = 16,1685 бит (округленно 16 бит)

Задание 4
I = 0.01 Гбайт, i = 16 бит, v = 44100 Гц Время t = 0,01 * 1024 * 1024 * 1024 * 8 бит / 16 бит / 44100 Гц = 121 с (округляем до 120 с)

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

1. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=1; while i<=... do begin writeln('Привет!'); i:=i+1 end; ответ: 8 2. Сколько раз будет выполнен этот цикл? i:=2; while i<5 do begin writeln('Привет!'); i:=i+1 end; ответ: 3 3. Какое число будет выведено на экран в результате выполнения этого цикла? i:=5; write('9'); while i<5 do begin write(i); i:=i+1 end; ответ: 5 4. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=7; while i>=... do begin writeln('Привет!'); i:=i-1 end; ответ: введите число 5. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=...; while i>=2 do begin writeln('Привет!'); i:=i-1 end; ответ: введите число 6. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза? i:=...; while i<=5 do begin writeln('Привет!'); i:=i+1 end; ответ: введите число 7. Чему будет равно значение переменной a после выполнения этого цикла? i:=4; a:=12; while i<6 do begin a:=a+i; i:=i+1 end; ответ: введите число