1) Обозначим количество символов за х.
В кодировке Unicode на каждый символ приходится 16 бит, в кодировке КОИ-8 8 бит. Так как количество символов при перекодировке не меняется, составим уравнение:
16х-480=8х
8х=480
х=480/8=60 символов
Ответ: 60 символов
2)Алфавит состоит из 2 букв ( точка и тире)
С помощью такого алфавита можно составить различных слов из 5 букв: 2^5= 32, из 6 букв: 2^6= 64
Итого 32+64= 96
Ответ: 96 символов
.......................................................
Описать переменную-это значит указать её тип.
Var x.k:integer;
BEGIN
k:=0;
for x:=100 to 999 do
if x mod 5 = 0 then begin writeln(x);k:=k+1; end;
writeln('k=',k);
end.
Нельзя преобразовать тип real к integer.
integer содержит только целые числа, а real действительные.
Программа работать не будет.