Прога на паскале В каждой строке файла записано три числа, каждое из которых находится в интервале[0,255]. Эти числа обозначают красную,зелёную и синюю составляющие цвета в цветовой модели RGB. Запишите в другой файл полные коды заданных цветов в виде целых чисел(код цвета= 255•255•R+255•G+B).
var
inputFile, outputFile: text;
R, G, B, colorCode: integer;
begin
assign(inputFile, 'input.txt');
reset(inputFile);
assign(outputFile, 'output.txt');
rewrite(outputFile);
while not eof(inputFile) do
begin
readln(inputFile, R, G, B);
colorCode := 255 * 255 * R + 255 * G + B;
writeln(outputFile, colorCode);
end;
close(inputFile);
close(outputFile);
end.