Обычно размер указывают, раз нету, взял по дефолту 10(Const N=10). И диапазон какой-то странный, думаю имелось введу (-5;5)
Program G;
Uses Crt;
Const N=10;
Var i: integer; mass: array [1..n] of integer;
Begin
Randomize;
ClrScr;
Writeln('Исходный массив из 10 чисел диапозона (-5;5):');
For i:=1 to N do
Begin
Mass[i]:=Random(11)-5;
Write(Mass[i]:4);
End;
Writeln;
Writeln('Исходный массив после замены всех отрицательны на -1:');
For i:=1 to N do
If mass[i]<0 then mass[i]:=-1;
For i:=1 to N do write(Mass[i]:4);
Readln;
<span> End.</span>
Ответ:
480
Объяснение:
a + x = 370
b + x = 250
a + x + b + x = 370 + 250
a + b + x + x = 620
a + b + x = 620 - х
x = 140
a + b + x = 620 - 140
a + b + x = 480
#include <iostream>
using namespace std;
int main()
{
double a,b;
cin>> a >> b;
if(a>b) cout << "Перше число більше";
else cout << "Друге число більше";
return 0;
}
Ответ:
Пусть x - количество зеленых яблок. I = log(2)[1/(x/36)] = log(2)[36/x] = 2; 36/x = 2^2; x = 9
Объяснение: