Program z1;
var f: array[1..14] of integer;
sum,i:integer;
begin
randomize;
for i:=1 to 14 do
begin
f[i]:=random(16,35);
writeln(f[i],' человек',' в',' ',i,' классе');
Sum:=Sum+f[I];
end;
writeln('----------------------');
writeln ('Всего человек:',sum);
writeln ('Нужно уроков:',14*2); // делим на 2 группы,т.к во всех классах >16 человек.
writeln ('Нужно часов:',(14*2)*0.75); // урок длится 3/4 часа (45 минут).
end.
If (x>=6) and (x<=8) then begin
z:= x div 2 ;
ответ 8 div 2 = 4 z:=4
Это клавиши Backspace и Delete. Delete удаляет все по правую сторону от курсора, а Backspace по левую сторону.
думаю, помогла:)
Очень просто! То, что требуется найти в задаче, то есть количество би первоначального сообщения обозначим за x 1. Тогда несложно составить уравнение. Использована формула перевода из 16-битной в 8-битную.
16*x=8*x+16*8 (плюс, потому что объем первоначального уменьшился, а полученного увеличился)
Из полученного уравнения находим х
х = 16
Вот и все, можно записать ответ:
Ответ: 16 бит
С
к
а
н
Компьютер
ы р
ш
ь