Program P1
var Name: string;
Age: integer;
begin
write ( укажите ваше имя)
readin ( string)
writlen( Здравствуйте , Name) ;
write ( ваш возраст)
readin ( integer)
write ( через два года вам будет : age + 2) ;
end
пример. ответить на во что будет, если вместо имени ввести цифру?
2) что будет, если на во о возрасте ввести букву?
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('*** Исходный массив ***');
var a:=MatrRandom(10,10,-75,132);
a.Println(4); Writeln(4*a.ColCount*'-');
var s:=a.ElementsWithIndexes.Where(t->t[0].Between(100,999));
foreach var t in s do Write('[',t[1]+1,',',t[2]+1,'] ')
end.
Пример
*** Исходный массив ***
-3 -22 -17 105 33 -73 37 109 83 106
-38 12 108 25 -8 0 97 -56 -24 10
78 108 8 7 89 -54 108 3 24 86
-31 -39 12 129 38 90 56 94 -26 84
24 -4 -14 9 87 126 82 129 15 104
20 68 61 -52 79 22 102 109 -59 12
-48 -41 9 129 61 -74 132 112 120 34
76 -72 103 25 118 6 47 132 53 95
-4 112 120 53 -10 33 33 -11 -25 -60
121 80 78 94 57 -10 120 -11 80 85
[1,4] [1,8] [1,10] [2,3] [3,2] [3,7] [4,4] [5,6] [5,8] [5,10] [6,7] [6,8] [7,4] [7,7] [7,8] [7,9] [8,3] [8,5] [8,8] [9,2] [9,3] [10,1] [10,7]
Во-первых, нам нужно определиться в количестве строк в нашей таблице. Нужно 2 возвести в степень количества переменных. У нас это A, B и C (¬A не считается переменной, ибо ¬ — это операция наж переменной А), их 3 шт, следовательно нужно возвести 2 в 3-ю степень. 2^3=8, поэтому будет 8 строк. Сначала записываются в строку наши переменные A, B, C. Под первой записываем половину нолей подряд, половину единиц, под B четверть (половину предыдущей половины) нолей, четверть единиц, чередуя. Для C я думаю понятно, как. Дальше в логическом выражении нужно расставить действия, а для этого нужно знать приоритеты логических операций (как в математике сначала скобки, потом умножение и деление, а уж потом сложение и вычитание). Приоритеты можно "загуглить". Самым приоритетным является логич. отрицание (¬), т.е. сначала выполняется оно, а уж потом все другое. Но тут мы видим большое отрицание всей скобки, но мы не будем искать сначала его, ибо это отрицание содержимого скобки, которое нужно еще найти. Видим ¬А, пишем в таблицу. Смотрим на столбик А и в ¬А пишем все наоборот. Т.е. если в А стоит 0, то в ¬А будет 1 и наоборот. Ибо так работает отрицание. Дальше смотрим. Есть /\ (конъюнкция — логич. умножение) и ∨ (дизъюнкция — логич. сложение). Первым делом после отрицания выполняется умножение, а потом сложение. Записываем С /\ В. Это работает как обычное умножение. Допустим, в С стоит 0, а в В стоит 1, то С*В=0*1=0. Если 1 и 1, то 1 (единственный случай в умножении, где получается единица). Дальше прибавляем НЕ А к С /\ В. Логическое сложение действует как обычное: 1+1=1, 1+0=1, 0+1=1, 0+0=0. И теперь пришли к отрицанию скобки. Чтобы не писать длинную последнюю формулу, можно обозначить ее буквой F. И делаем отрицание нашего последнего выражения (¬А∨С /\ В).