1) найти значение логического выражения. F=А V B & не C, А=1, В=1, С=1

1)1. 2)0

2) найти значение логического выражения

F=А V B & не C, А=1, В=1, С=1

1)1. 2)0

3) найти значение логического выражения

F=не А V B & C, А=1, В=0, С=1

1)1. 2)0

4) найти значение логического выражения

F=(А V B ) & ( не C V B) , А=1, В=1, С=1

1)1. 2)0

5) найти значение логического выражения

F=не (А V B & C) , А=0, В=1, С=1

1)1. 2)0

конкретно в каких стейтментах была ошибка , я не смог разобраться , но фактически у тебя

1.был не правильный вывод (m[1])

2.неправильная итерация по циклу с переменной 'с'

крч легче было просто переделать

var

c, n, i, j: integer;

m: array[1..1000] of integer;

begin

Readln(n);

for i := 1 to n do

begin

m[i] := i;

Write(m[i], ' ');

end;

writeln;

while n >= 1 do

begin

if c+2 < n then c := c + 3 else c := n - c + 3;

for i:=c to n do m[c]:=m[c+1];

n := n - 1;

end;

writeln(m[c]);

end.

Школьный обед - меню (список блюд с ценой), сколько человек подписаны на бесплатный/комплексный обед, какой объем блюд нужно приготовить к обеду, время обеда и тд

Ремонт квартиры - какие изменение необходимо сделать, бюджет, кто будет делать, материалы и их приобретение, инструменты, рассчетное время ремонта и тд

Пассажир поезда - имя, место, билет, постель, чай, спутники, багаж, от куда и куда, поезд и вагон

Дом, в котором ты живешь -  адрес, этажность, материал стен, коммуникации, год сдачи, кол-во подьездов и тп