Ввести число 1
|
Ввести число 2
|
Если число 1 больше числа 2
да нет
| |
чиcло1=число1*2 чиcло1=число1^2
чиcло2=число2^2 чиcло2=число2*2
|_____________________ |
|
Вывести число 1
|
Вывести число 2
var a,i,s,k:integer;
begin
s:=0; k:=0;
for i:=1 to 16 do
begin
a:=random(36)-16;
write(a,' ');
if a<0 then
begin k:=k+1; s:=s+a; end;
end;
writeln;
if k=0 then writeln('Нет отрицательных')
else writeln('k = ',k,' s = ',s,' sr = ',s/k:5:3);
end.
Пример:
-8 17 -1 -8 11 8 -5 7 8 -4 4 5 10 -16 12 4
k = 6 s = -42 sr = -7.000
Ты не сказал на каком языке тебе нужно написать данную программу. Т.к я специализируюсь на Python`e, то на нём я её и написал. Прикрепляю скриншот кода к своему ответу, дабы было всё понятно и ясно.
** Если есть вопросы, или что - то тебе нужно объяснить пиши в коментарии под мои ответом, обязательно объясню
** Ставь Лучший ответ если действительно помог ))
Спутники ловят сигналы из одной точки земли и посылают их в другую.
Может быть эти задачи на выбывание предметов по условию?!