Question

Помогите решить задачи на языке Паскаль 1. Найти сумма всех значений выражения y=x-4 цикл до x€[ 2;14] 2. Найти все значения выраженияy=2x+3 цикл пока x€[3;17]

Answer 1

Var x,y,x1,y1,i:integer;beginfor x1:=2 to 14 do y1:=x1-4;for x:=3 to 17 do y:=2*x+3;writeln(y1);writeln(y);end.

Answer 2

Конечно, я могу помочь вам решить эти задачи на языке Pascal. Давайте рассмотрим каждую задачу по отдельности.

1. Найти сумму всех значений выражения y = x - 4 в цикле для x ∈ [2;14].

Для решения этой задачи вы можете использовать цикл `for`, чтобы перебирать значения `x` от 2 до 14, вычислять соответствующее значение `y` и добавлять его к сумме. Вот как это можно сделать на Pascal:

program SumOfExpression;
var
  x, y, sum: Integer;
begin
  sum := 0;
  for x := 2 to 14 do
  begin
    y := x - 4;
    sum := sum + y;
  end;
  writeln('Сумма всех значений выражения y = x - 4 равна: ', sum);
end.

2. Найти все значения выражения y = 2x + 3 в цикле пока x ∈ [3;17].

В этой задаче также используется цикл `for`, чтобы перебирать значения `x` от 3 до 17, вычислять соответствующее значение `y` и выводить его. Вот пример на Pascal:

program ExpressionValues;
var
  x, y: Integer;
begin
  for x := 3 to 17 do
  begin
    y := 2 * x + 3;
    writeln('Для x = ', x, ' значение y = ', y);
  end;
end.

Оба этих примера кода выполняют указанные задачи и позволяют найти сумму значений выражения и вывести все значения `y` в заданных интервалах для `x`.