Объяснение:
во вложениях.....
^ у меня не ставится, но выполняет свои действия, у себя его ставьте!
//PascalABC.NET 3.1 сборка 1219
begin
var a := ArrRandomInteger(ReadInteger('x ='), -17, 17);
a.Println;
a.Transform(x -> -x);
a.Println;
end.
Задание №1:
program Program1;
var a, b, c, d, S1, S2: real;
begin
writeln('Введите значения a и b:');
readln(a, b);
S1 := a * b;
S2 := S1 / 6;
writeln('Введите значение c:');
readln(c);
d := S2 / c;
writeln('Вторая сторона второго прямоугольника = ', d);
end.
Задание №2:
1 итерация цикла: S = 3
2 итерация цикла: S = 21
3 итерация цикла: S = 81
Ответ: 81.
#include <iostream>
#include <cmath>
using namespace std;
int main() {
double x=12.3,y,z;
y = sqrt(pow(x,3)/10) + exp((15*pow(x,4))/(pow(x,5) - 2.5));
z = sqrt(abs(pow(x,3) - 0.53));
cout << "Y: " << y << endl << "Z: " << z;
}