В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
selihanova
selihanova
22.02.2020 01:35 •  Информатика

Составить таблицы истинности

Показать ответ
Ответ:
alyabub
alyabub
04.05.2022 06:03
Program rand_max;
  const
    size=8;
  var
    main_mas: array [1..size] of integer;
    i,nchet,proizv:integer;
  begin 
        nchet:=0; 
        proizv:=1; 
        randomize; 
        writeln('Исходный массив:'); 
        for i:=1 to size do  begin   
           main_mas[i]:=random(11);   
           write(' ',main_mas[i],' ');   
           if (Odd(main_mas[i])) then      
                begin       
                    inc(nchet);       
                    proizv:=proizv*main_mas[i];     
                end; 
       end; 
       writeln; 
       writeln('Кол-во нечетных: ',nchet); 
       writeln('Произведениче нечетных = ',proizv);  
end.
0,0(0 оценок)
Ответ:
Golinskaya2002a
Golinskaya2002a
25.02.2020 10:43
<head>
<meta charset="utf-8">
<title>Факториал</title>
</head>
<body>
<form action="/test.php" method="post">
<p><input name="go" placeholder="Enter number" maxlength="20"></p>
<p><input type="submit" value="Send"></p></action>
<?php if (isset($_POST["go"]))
{echo factorial($_POST["go"]);
}
function factorial($n)
{  return $n?$n*factorial($n-1):1;
}
?>
</form>
</body>
</html>

вариант2

<head>
<meta charset="utf-8">
<title>Factor</title>
</head>
<body>
<form action="/test.php" method="post">
<p><input name="go" placeholder="Enter number" maxlength="20"></p>
<p><input type="submit" value="Send"></p>
</action><?php if (isset($_POST["go"]))
{
echo $_POST["go"]."!=";
$result=1;
$go=($_POST["go"]);
while ($go>1){
$result=$result*($go);
echo $go."x";
$go--;
}
echo "1=".$result;
}
?>
 </form>
</body>
</html>
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота