Информатика 15 дней назад kamiloxcoid13

Прога на паскале
В каждой строке файла записано три числа, каждое из которых находится в интервале[0,255]. Эти числа обозначают красную,зелёную и синюю составляющие цвета в цветовой модели RGB. Запишите в другой файл полные коды заданных цветов в виде целых чисел(код цвета= 255•255•R+255•G+B).

Ответ
1
Инкогнито
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ReadAllText('input.txt').ToIntegers; // a[0]=R,.. a[2]=B
  WriteAllText('output.txt',(a[0]*255*255+a[1]*256+a[2]).ToString)
end.
Инкогнито: Файл должен находиться в одной директории с файлом программы, либо надо указать полный путь по типу 'C:\MyFile\input.txt'
kamiloxcoid13: Спасибо; но можно как-нибудь попроще?)просто я ещё не прошла такие штуки,как AllText или ToIntegers
Инкогнито: Две строки - это сложно???
Инкогнито: ReadAllText тупо читает файл в строку. Весь и зараз. ToIntegers берет строку, делит ее на числа и превращает в целочисленный массив.
Инкогнито: Возможно, для Вас "попроще" то, что написали выше. Но нужно указывать версию Паскаля, мысли читать я пока что еще не научился.