Kirill91623
19.06.2021 08:25

Напишите программу ,которая находит все четные натуральные числа ,не превосходящие число N

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
sinelena2018
02.02.2023 07:43

1. Сайт содержит 5 страниц (главная, 4 страницы без темы (полагаю, это уже Ваша работа), запустится, естественно, только у Вас на компьютере.

2. На каждой странице задан фон, цвет шрифта и размер шрифта. Вы можете менять эти параметры по своему усмотрению. О том, как это сделать, разъясню в комментариях, если будет такая необходимость.

2.1 На каждой странице содержатся гиперссылки (переход на следующую страницу, на предыдущую и возврат на главную страницу) и картинки. Картинки в примере называются "1.png", "2.png" и так далее. Найдете любые картинки по выбранной Вами теме и назовете их, как указано в html-разметке.

3. На главной странице сформирован список, содержащий ссылки на 4 страницы сайта.

Решение поставленной задачи приложено в виде текстового файла, содержащего разметку для 5 html-страниц. Нужно будет создать 5 текстовых файлов с блокнота и назвать их так, как указано в решении (не забыть изменить расширение на .html)

0,0(0 оценок)
Ответ:
Naruto7xokage
12.10.2022 03:07

const N = 20;

const MAX = 70;

const MIN = 20;

var A: array [1..N] of integer;

var i,c1,c2: integer;

begin

randomize();

c1:=-1;

c2:=-1;

writeln('Исходный массив: ');

for i:=1 to N do

 begin

 A[i]:=random(MAX-MIN+1)+MIN;

 write(A[i],' ');

 if (A[i] mod 2 = 0) then  

   if (c1=-1) or (A[i]<A[c1]) then c1:=i;

 if (A[i] mod 2 <> 0) then  

   if (c2=-1) or (A[i]<A[c2]) then c2:=i;

 end;

writeln();

if (c1<>-1) then writeln('Минимальное четное: ',A[c1]);

if (c2<>-1) then writeln('Минимальное нечетное: ',A[c2]);

end.

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