begin
var n := 25;
var M := ArrRandom(n, -50, 50);
M.Println; // исходный массив
// пузырьковая сортировка
for var i := n - 2 downto 0 do
for var j := 0 to i do
if M[j] > M[j + 1] then Swap(M[j], M[j + 1]);
M.Println; // отсортированный массив
var C := ReadInteger('Значение удаляемого элемента:');
var p := M.BinarySearch(C);
if p >= 0 then
begin
M := (M?[:p] + M?[p + 1:]).ToArray;
M.Println; // результат
end
else Println('Элемент не найден')
end.
#include <bits/stdc++.h>
using namespace std;
int main() {
int a[10];
int i = 0;
while (i < 10) {
cin >> a[i];
++i;
}
i = 0;
while (i < 10) {
cout << (2 * a[i] * a[i]) << endl;
++i;
}
return 0;
}
#include <bits/stdc++.h>
using namespace std;
int main() {
int x;
int i = 0;
while (i < 10) {
cin >> x;
cout << (2 * x * x) << endl;
++i;
}
return 0;
}
