Паскаль. Через процедуру нужно вывести массив, состоящий из двузначных четных чисел. Почему-то при вводе, например, n=3, выводит только 2 элемента массива Как выводить ровно столько, сколько задаю переменных? .
Type Mass=array [1..100] of integer;
var b:Mass;
n:integer;
procedure заполнение(n:integer);
var i:integer;
begin
for i := 1 to n do
b[i] := random(100);
for i := 1 to n do begin
if (b[i] mod 2 = 0) and (b[i]>=10) and (b[i]<=100) then
write(b[i] );
end;
end;
begin
writeln('Ввод');
read(n);
заполнение(n);
end.
На диаграмме изображены три логических выражения и соответствующие им области истинности. Давайте рассмотрим каждое выражение по отдельности и определим его область истинности.
1. Выражение "x>0" означает, что переменная "x" должна быть больше нуля. Заштрихованная часть на диаграмме представляет все значения "x", для которых данное выражение истинно. Таким образом, область истинности этого выражения на диаграмме находится справа от нуля.
2. Выражение "y≤0" говорит о том, что переменная "y" должна быть меньше или равна нулю. Заштрихованная часть на диаграмме представляет все значения "y", для которых данное выражение истинно. Таким образом, область истинности этого выражения на диаграмме находится слева от нуля и включает ноль.
3. Выражение "x+y<1" указывает, что сумма переменных "x" и "y" должна быть меньше единицы. Заштрихованная часть на диаграмме представляет все значения "x" и "y", для которых данное выражение истинно. Таким образом, область истинности этого выражения на диаграмме находится под прямой, образованной точками с координатами (1,0) и (0,1).
Надеюсь, мой ответ был понятен и информативен. Если у вас остались какие-либо вопросы, буду рад помочь!