Это . в одной из кодировок кои-8 каждый символ кодируется 8 битами. определите информационный объём следующего предложения в данной кодировке. и уносят меня в звенящую снежную даль. 1) 256 бит 2) 608 бит 3) 304 бит 4) 76 байт

3

Объяснение:

Процедура delete имеет следующий вид: delete([строка], [идекс], [количество]) - т.е. из строки [строка] с позиции [индекс] будет удалено [количество] символов. На твоём примере: пока длина строки s больше 0 с позиции 1 удаляем два символа и выводим на экран единицу. На первой итерации цикла строка "123456" превратится в строку "3456", на второй итерации в "56" и на последней, третей итерации в "". Итого, чтобы длина строки стала 0 потребовалось 3 итерации, т.е. на экран выведется три единицы

3, 6 (но с уловием, что это последняя строка кода перед end.)

Объяснение:

1.) if x>0 or y>0 then k:= k+1 else k:= 0; - неверно, потому что при использовании and или or сравниваемые условия необходимо указывать в ( )

2.) if 10 then k:= k+1; - должно быть указано условие, просто число не может быть условием (по крайней мере в pascal)

3.) if x<>0 then y:=100/x; - всё ОК

4.) if x - нет then,

5.) if x>0 then y:= 100 div x; else y:= 0; - перед else не ставится ;

6.) if (x mod y=0) then else writeln(‘no’) - всё ОК, с условием, что это последняя срока кода перед end. Если условие будет истинно, то просто ничего не выполнится. И ещё небольшой комментарий: символ ’ не используется для написания строки, нужен символ '. Возможно это ты малость ошибся, при переписывании задания