ОЧЕНЬ НАДО!!!!!! ТОЛЬКО ПОЛНУЮ ПРОГРАММУ НЕ С ИНТЕРНЕТА ТАМ НИЧЕГО ГОДНОГО НЕТ!!!!!! В PASCAL
Вот задача:
В каждой строке файла записано три числа, каждое из которых находится в интервале [0,255]. Эти числа обозначают красную, зелёную и синюю составляющие цвета в цветовой модели RGB. Запишите в другой файл полные коды заданных цветов в виде целых чисел (код цвета = 255·255·R + 255·G + B).

Program n_1;
var
a:array[1..10] of integer;
i,k:integer;
begin
k:=0
randomize;
for i:=1 to 10 do
begin
a[i]:=random(2);
if a[i]=1 then k:=k+1;
end;
writeln(k)
end.

Исходя из того, что тут написано:
число 29_8 неверно, так как в восьмеричной системе все числа записываются при помощи цифр 0 1 2 3 4 5 6 7,а цифра 9 недопустима
число 42_2 неверно, так как в двоичной системе исчисления есть только 0 и 1
число 11_2 записано верно и в десятичной будет иметь значение 3
(принцип 0=0,  1=1, 10=2, 11=3, 100=4, ...)
число 11_6 записано верно и в десятичной будет иметь значение 7
(принцип 0=0,  1=1, 2=2, 3=3, 4=4, 5=5, 10=6, 11=7, 12=8, ...)

А. a=0, b=1, c=0, d=o
б. a=1, b=0, c=0, d=1
в. a=0, b=1, c=0, d=o
г. a=1, b=1, c=1, d=o
д. a=1, b=0, c=0, d=o
е. a=0, b=0, c=1, d=1