ответ:Program Test,
Var x, y, z: integer; a1, a2: real;
Begin
Writeln('Введите значения х, y, z');
Readln(x, y, z);
a1 := (x + y - z) / (x * 2 + 2);
a2 := 5 * ((2 * x - z) / (3 + y * 2));
Writeln();
Writeln('a1 = ', a1);
Writeln('a2 = ', a2);
End.
P.S. Программа на паскале; На будующее - пиши условие задачи понятнее. Не х2, а х * 2 или 2х, а то это можно посчитать как х^2
ответ к заданию 1 - это а1, а к заданию 2 - это а2
Объяснение:
ответ:Program Test,
Var x, y, z: integer; a1, a2: real;
Begin
Writeln('Введите значения х, y, z');
Readln(x, y, z);
a1 := (x + y - z) / (x * 2 + 2);
a2 := 5 * ((2 * x - z) / (3 + y * 2));
Writeln();
Writeln('a1 = ', a1);
Writeln('a2 = ', a2);
End.
P.S. Программа на паскале; На будующее - пиши условие задачи понятнее. Не х2, а х * 2 или 2х, а то это можно посчитать как х^2
ответ к заданию 1 - это а1, а к заданию 2 - это а2
Объяснение: