ответ: Программа рабочая, проверена.
Program zadacha;
var
a: array [1..50] of integer; // размерность массива = 50
i,k: integer;
begin
begin
for i:=1 to 50 do
a[i] := Random(100); // числа от 0 до 100 будут присутствовать в массиве
writeln('Заполненный массив: ');
for i:=1 to 50 do
write(a[i],' '); end; // выводим массив на экран до проверки
writeln; //новая строка
writeln('Введите значение числа K: '); readln(k);
writeln('Элементы массива, кратные K:');
for i:=1 to 50 do
if (a[i] mod k = 0) then write(a[i],' ');
end.
Объяснение:
i - порядковый номер элемента
a - сам массив
k - вводимое число
В остальном оставила комментарии.
Размерность массива и его диапазон указан в программе числами, т.к. в задаче не было вопроса о вводе элементов или вводе размерности.
<html>
<head>
<title> Информация обо мне </title>
<body>
<h1> Информация обо мне<h1>
Фамилия Имя Отчество
Название школы
Номер класса
</body>
</head>
</html>
Объяснение:
p.s <title> Информация обо мне </title> можешь не писать это название страницы
<h1> Информация обо мне<h1> тоже можешь не писать это заголовок
и еще можешь цвета текста менять и размеры
<font color=red size= 5>
Фамилия Имя Отчество
Название школы
Номер класса
</font>
Объяснение.
НЕ ( x < 6 ) это x >= 6.Получаем x>= 6 или (x < 5 и x >= 4).
true это правда.
false это ложь.
И(Конъюнкция) это логическая операция,которая возвращает true если обе части уравнения равны true.
Или(Дизъюнкция) это логическая операция,которая возвращает false когда обе части уравнения равны false.
Итак, нам нужно чтобы обе части уравнения были false.
Вариант 1 сразу не подходит,т.к. 7 больше 6.
Вариант 2 тоже не подходит,потому что 6 = 6.
Вариант 3 подходит.
Вариант 4 не подходит,ведь 4 не меньше 5.