Алина13445
29.01.2022 01:11

Как сделать программу которая генерирует 5 случайных чисел, печатает их, и выводит их произведение

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
OligCh
25.06.2021 20:53
<?php
echo "Исходный массив:";
$n = rand(1,13);
$S = 0;
for($i = 0; $i < $n; $i++)
{
   $A[] = rand(-10,10);
   $S+=$A[$i];
   echo " $A[$i]";
}
echo "<br>Сумма элементов = $S<br>";

$k = -1;
for($i = $n-1; $i >= 0; $i--)
   if ($A[$i] < 0) $k = $i;
if ($k == -1) echo "В массиве нет отрицательных элементов";
else echo "№ первого отрицательного: $k";
$Sr = $S/$n;
echo "<br>Sr = $Sr<br>";
$B = 0;
$C = 0;
for($i = 0; $i < $n; $i++)
{
   if ($A[$i] < $Sr) $B = $i;
   if ($A[$i] > $Sr) $C = $i;
}
echo "№ элемента, превышающего Sr: $C<br>";
echo "№ элемента, который меньше Sr: $B";
?>
0,0(0 оценок)
Ответ:
Maximoniko
16.08.2021 15:45

решения задачи используется цикл for

var

a, b: integer;

begin

write('A: '); readln(a);

write('B: '); readln(b);

if a < b then

for a := a to b do

writeln (a * a * a);

readln;

end.

Пользователь может ввести значения так, что a будет больше b. В таком случае цикл for не выполнится.

Действительно, if здесь лишнее. Оно имеет смысл только в случае, когда обрабатывается ситуация, где значение b меньше, чем a:

var

a,b:integer;

begin

write('A: '); readln(a);

write('B: '); readln(b);

if a < b then

for a:=a to b do

writeln(a*a*a)

else

for a:=a downto b do

writeln(a*a*a);

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота