Номер 72) 2цепь, 3цепь, 7цепь,8цепь,10цепь
CLSINPUT NDIM A(N), B(N)FOR i = 1 TO N A(i) = INT(RND * 100)NEXT imin = A(1)FOR i = 2 TO N IF A(i) < min THEN min = A(i)NEXT iFOR i = 1 TO N A(i) = min * A(i)NEXT iFOR i = 1 TO N B(i) = INT(RND * 100)NEXT imin = B(1)FOR i = 2 TO N IF B(i) < min THEN min = B(i)NEXT iFOR i = 1 TO N B(i) = min * B(i)NEXT iFOR i = 1 TO N PRINT A(i);NEXT iPRINTFOR i = 1 TO N PRINT B(i);NEXT i
Var x:integer;
begin
writeln('Введите чилос x: ');
readln(x);
if x>= 100 then
if (not odd(x)) then
writeln('TRUE')
else
writeln('FALSE')
else
writeln('Число не трехзначное');
<span>end.
Надеюсь правильно понял тебя и составил программу верно.</span>
<span>Цифры стоят в алфавитном порядке: 8 (Восемь), 2 (Два) ...</span>
Ответ:
Создание цифрового видео первый этап, подготовка
Все этапы создания цифрового видео важны, но самый первый этап, подготовка, способен сэкономить больше времени и средств, чем любой другой. Если вы выполнили подготовку, вы сможете справиться практически с любой проблемой. Во время работы вам необходимо заранее готовиться к следующему этапу.
Всегда воспринимайте проект как нечто целостное, а не как группу отдельных файлов, которые должны быть объединены только перед завершением работы. Любое выполненное вами действие повлияет на весь проект. Поэтому, если вы совершите ошибку на одном этапе, она будет доставлять вам неудобство на всем протяжении работы.
