1. ввести два числа, если первое меньше второго, вывести первое, иначе вывести второе. 2. ввести число. если остаток от деления этого на два равен нулю, умножить число на 10. прошу оформить ответ в форме блок схемы и алгоритма-по
119
302
Ответы на вопрос:
Uses crt; const n=20; var i,min: integer; a: array [1..n] of integer; begin randomize; for i: =1 to n do a[i]: = random(2001)-1000; {read (a[i])}{ручной ввод чисел} min: =1001; for i: =1 to n do if (a[i]> 0) and (a[i]mod 3=0) and (odd(a[i])) and (a[i]< min) then min: =a[i]; if min< > 1001 then writeln(min) else writeln('нет чисел удовлетворяющих заданному условию'); end.
Популярно: Информатика
-
12dosbol27.10.2022 09:56
-
TadaseXotory03.05.2021 20:19
-
Алкадиеныч14.11.2021 03:19
-
oksanasmolko2005.09.2021 17:53
-
edbaldin201703.06.2023 22:08
-
Godzula30.03.2023 21:37
-
misharudakov203.04.2021 02:27
-
alina20053030.11.2022 22:51
-
BTS4831.05.2022 14:17
-
Златаник201725.04.2021 11:45