C клавиатуры вводится число x. Если число x=1, экран выводит сообщение "красный" x=2, то "зеленый" x=3, то "синий" (Pascal)

Пример работы: [на фото].

Var X: Integer;

begin

Write('Введите число Х:');

Readln(X);

if X = 1 then Writeln('Красный')

else If X = 2 then Writeln('Зелёный')

else Writeln('Синий');

Readln;

end.

Информация – это знания. Человек воспринимает информацию из окружающего мира с органов чувств; их пять: зрение, слух, вкус, обоняние, осязание. 
Информация, воспринимаемая человеком в речевой или письменной форме, называется символьной, или знаковой информацией.Язык - это знаковый представления информации. Общение на языках это процесс передачи информации в знаковой форме. Образная информация -это сохраненные в памяти ощущения человека от контакта с источником (вкусы, запахи, осязательные ощущения, зрительные и звуковые образы)
Информационные процессы. Любой человек постоянно занят какой-то работой с информацией: читает книгу, подсчитывает стоимость покупки, пересказывает другому человеку какие-то сведения, заучивает правила, решает задачи и другое. Профессии многих людей связаны исключительно с информационной деятельностью: это учителя, студенты, журналисты, писатели, переводчики и т.д. Они выполняют процессы, связанные с информацией, а именно информационные процессы.Информационные процессы - это процессы, связанные с получением, хранением, обработкой и передачей информации.Передача. Очень часто любому человеку приходиться участвовать в процессе передачи информации. Передача происходит при непосредственном разговоре между людьми, через переписку, телефон, радио, телевидение. Передача информации всегда двухсторонний процесс: есть источник, и есть приемник информации. Каждому человеку постоянно приходиться переходить от роли источника к роли приемника информации и обратно.Обработка. Процесс обработки информации связан с получением новой или изменением формы или структуры данной информации, осуществлением поиска информации на внешних носителях.Хранение. Человек хранит информацию в собственной памяти (внутренняя оперативная информация) и на внешних носителях: бумаге, магнитной ленте, дисках и тд. Наша внутренняя память не всегда надежна. Человек нередко что-то забывает. Информация на внешних носителях храниться дольше, надежнее. Именно с внешних носителей люди передают свои знания из поколения в поколение.

Program pr3;

const {убраны лишние описатели - чистая косметика}
  a = 2.12;
  b = 7.45;
  h = 0.34;

var
  x, f1, f2, y, s: real;
  i, n: integer; {описание, необходимое для цикла}

begin
  { x := a; этот оператор не нужен }
  s := 0;
  n := Trunc((b - a) / h)+1; {стандартная формула числа повторений цикла }
  for i := 1 to n do { Заголовок цикла }
  begin   {начало блока для выполнения в цикле }
    x := a + (i - 1) * h;  { перенесено из конца цикла }
    f1 := 3 * ln(exp(1 / 5) * ln(sin(x) + sqr(x)));
    f2 := ((2 * x + 1) / (x * x * x * x * x));
    y := f1 / f2;
    s := s + y;
  end;  {конец блока для выполнения в цикле }
  Writeln('S=', s:10:5);
end.

Тестовое решение:

S=26390.53751