const DOLLAR = 68; // доллар в руб
const EURO = 75; // евро в руб
let rub = prompt("Введите сколько хотити перевести");
rub = parseInt(rub, 10);
alert("Доллары: " + rub/DOLLAR + "\nЕвро: " + rub/EURO );
Uses crt;
var i,n:integer;
a:array[1..100] of real;
begin
writeln('Сколько чисел в массиве?');
read(n);
writeln('Введите элементы.');
for i:=1 to n do
begin
read(a[i]);
if a[i]<0 then
a[i]:=abs(a[i]);
end;
for i:=1 to n do
write(a[i],' ');
<span>end.</span>
#include <iostream>
using namespace std;
void main()
{<span> int a[10] = {0,0,1,0,1,4,5,0,3,1};//в скобках впиши массив свой.</span><span>
</span><span>for (int i = 0;i < 10;++i)
</span><span> {</span><span>
int k = 0;
</span><span> for (int j = 0;j < 10;++j)</span><span>
{
</span><span> if (a[i] == a[j])</span><span> k++;</span><span>
}</span><span>
if ((k >= 3) && (k <= 4))</span><span> cout << i << " ";</span>
<span> }
</span><span> system("pause");
</span><span>}</span>