Помогите с информатикой

Циклы в программировании - это управляющие конструкции, которые позволяют многократно выполнять один и тот же участок кода. Циклы бывают разных видов, например, for, while, do-while и т.д.
Один из видов циклов - цикл for. Цикл for используется для многократного выполнения блока кода с заданным количеством итераций. Он состоит из трех частей: инициализации, условия и инкремента. В первой части задается начальное значение счетчика, во второй - условие, при котором цикл будет продолжаться, а в третьей - инструкция, которая будет выполняться после каждой итерации цикла.

 program for_example; 

 

var 

  i: integer; 

 

begin 

  for i := 1 to 10 do 

    writeln(i); 

end. 

В этом примере цикл for будет выполняться 10 раз, выводя на экран числа от 1 до 10. Сначала переменная i инициализируется значением 1, затем проверяется условие i <= 10, и если оно истинно, выполняется тело цикла, после чего переменная i инкрементируется на 1. Этот процесс повторяется до тех пор, пока условие i <= 10 не станет ложным.

2 вопрос
Программа на языке Pascal для нахождения переменной по формуле: y=(c+4+b)/a

 program find_y; 

 

var 

  a, b, c, y: real; 

 

begin 

  write('Введите значение a: '); 

  readln(a); 

  write('Введите значение b: '); 

  readln(b); 

  write('Введите значение c: '); 

  readln(c); 

  y := (c + 4 + b) / a; 

  writeln('Значение y: ', y); 

end. 

В этой программе пользователь вводит значения переменных a, b и c, после чего программа вычисляет значение переменной y по формуле y=(c+4+b)/a и выводит его на экран.
3
Данная программа на Pascal решает задачу нахождения значения переменной k, которая вначале инициализируется значением 80, а затем в цикле while делится на 2 до тех пор, пока значение k не станет меньше или равно 3. После выполнения цикла while программа выводит значение переменной k на экран.
Трассировочная таблица для данной программы:После выполнения цикла while значение переменной k будет равно 2.
4
Данная программа на Pascal решает задачу нахождения произведения чисел, которые кратны 3, начиная с 1 и заканчивая 9. Переменная P инициализируется значением 1, а переменная j - значением 1. Затем в цикле while переменная P умножается на значение переменной j, а переменная j увеличивается на 3 до тех пор, пока значение переменной j не станет больше 9. После выполнения цикла while программа выводит значения переменных j и P на экран.
Трассировочная таблица для данной программы:После выполнения цикла while значение переменной j будет равно 10, а значение переменной P - 96.

Последняя задача, которую БОТ не смог решить :)))

var X, Y : real;
begin
Write (' Введите X = '); ReadLn (X);
if (X < 0) then Y := 2*X else Y := X + 10;
WriteLn (' При X=', X, ' значение функции Y=', Y );
end.

Дворником умтройся и всё