Во Какие операторы не могут быть выполнены в теле цикла с указанным заголовком? for i:=1 to n do Варианты ответов i:=i-1; t:=i+2; n:=n-1; t:=n-i; Во Какой оператор в языке Паскаль предназначен для реализации цикла с заданным числом повторений? Варианты ответов if for while repeat Во Какие из приведённых циклов предназначены для возведения числа k в степень n? Варианты ответов for i:=1 to n do k:=k*k; r:=1; for i:=1 to n do r:=r*k; for i:=n downto 1 do k:=k*k; r:=1; for i:=n downto 1 do r:=r*k; Во Чему будет равно значение переменной t после выполнения данной последовательности команд? t:=0; for i:=1 to 20 do for j:=1 to 30 do t:=t+1; Во Какая из приведённых блок-схем описывает цикл с заданным числом повторений? Варианты ответов Во Частным случаем какого цикла является цикл с заданным числом повторений? Варианты ответов Цикла с параметром Цикла с постусловием Цикла с предусловием Никакого из перечисленных Во Сколько раз будет выполнен заданный цикл? for i:=20 downto 1 do t:=random (100); Варианты ответов 1 19 20 21 Во Сколько раз будет выполнен заданный цикл? for i:=1 to 15 do t:=random (100); Варианты ответов 15 1 0 14 Во Как называется цикл, число повторений которого неизвестно до начала его работы? Варианты ответов Итерационный цикл Цикл с предусловием Цикл с постусловием Безитерационный цикл Во Сколько раз будет выполнен описанный цикл? for i:=2 to 1 do t:=random (100); Варианты ответов 1 2 0 3
Ответы
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
var a:=MatrixRandom(7,7,0,9);
var k:=0;
for var i:=0 to 6 do begin
for var j:=0 to 6 do begin
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Тестовое решение:
2 1 7 3 3 2 7
9 2 9 2 0 5 5
4 2 6 9 4 6 0
1 0 3 5 4 5 9
6 3 6 0 2 0 8
0 8 4 3 2 1 8
6 0 4 4 5 4 0
Кол-во элементов на [1,5]: 27
Вариант "совсем для школы"
const
n=7;
var
a:array[1..n,1..n] of integer;
i,j,k:integer;
begin
Randomize;
k:=0;
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=Random(10);
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
begin
var a:=MatrixRandom(7,7,0,9);
var k:=0;
for var i:=0 to 6 do begin
for var j:=0 to 6 do begin
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Тестовое решение:
2 1 7 3 3 2 7
9 2 9 2 0 5 5
4 2 6 9 4 6 0
1 0 3 5 4 5 9
6 3 6 0 2 0 8
0 8 4 3 2 1 8
6 0 4 4 5 4 0
Кол-во элементов на [1,5]: 27
Вариант "совсем для школы"
const
n=7;
var
a:array[1..n,1..n] of integer;
i,j,k:integer;
begin
Randomize;
k:=0;
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=Random(10);
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
как это решить , подробно
Автор: strelnikov-aa
написать программу для их сложения Переводить в десятиричную систему нельзя
Автор: игнатова_Сергей1228
Составить программу для нахождения суммы первых шести чисел.
Автор: ShALIGINA
2. Вміст поточної (виділеної) комірки відображається
Автор: Annabill1987
Как называется наименьшая единица измерения количечтва информации
Автор: Евгений1286
Выполните операцию в соответствующей системе счисление
Автор: Larisa Bulgakova
Як реагує програма коли користувач вводить числа збільшою або меншою кількість цифр?
Автор: Mikhailovna_Litvinova276
440
Определим количество символов в алфавите, которым кодируется пароль. По условию он состоит из 10 букв, 10 цифр ( от 0 до 9 ) и 5 специальных символов. Итого N=10+10+5 = 25
Определим информационный объем одного символа i из формулы N=2^i По условию все символы кодируют одинаковым и минимально возможным количеством бит.
2⁴ ≤ i ≤ 2 ⁵ ⇒ i= 5 бит
Пароль состоит из 10 символов, значит его объем I = i*k= 5*10 = 50 бит, но по условию задачи на хранение как пароля, так и дополнительных сведений отведено одинаковое для каждого пользователя целое количество байт. Ближайшее к 50 число кратное 8 равно 56.
таким образом информационный объем пароля I = 56/8=7 байт
Но так как по условию для хранения пароля выделено в байтах в 1,5 раза меньше памяти, чем для хранения дополнительных сведений, то размеры пароля и дополнительных сведений в соотношении 1 к 1,5
верны при значениях 8 и 12 байт
Итого на одного пользователя выделено 8+12 = 20 байт
Для 22 пользователей: 22*20= 440 байт
Объяснение: