1. Какие логические операции вам известны?
2 Какие значения принимают логические операции?
Какие логические функции имеются в электронной таблице')
4. Каковы значения логических функций и, или инро
5. Определите результат: и(-2), 2-43), ИЛИ (58/2, 93-
3 - 1), НЕ (234).
6. Определите результат: ЕСЛИ (4>1; 5; 2), ЕСЛИ (99/99,
«Ошибка»; «Правильно» ).
7. Запишите операции, в результате которых при введении в
Ячейку А5 пароля "Информатика” в ячейке B5 отразится
запись «Современная наука», а в противном случае отразит-
ся запись «Пароль не верен»,
Попутно замечу, что подобные подсчеты не гарантирует проверки синтаксической правильности расстановки скобок, например, выражение )a+b( синтаксически неверно, но в нем "правильное" количество скобок.
var
i,k:integer;
s:string;
begin
Write('Введите строку: '); Readln(s);
k:=0;
for i:=1 to Length(s) do
case s[i] of
'(':Inc(k);
')':Dec(k)
end;
if k=0 then Writeln('Скобки парные')
else
begin
Write('Обнаружено непарных ');
if k>0 then Write('открывающих') else Write('закрывающих');
Writeln(' скобок: ',abs(k))
end
end.
Тестовое решение:
Введите строку: (3*k+1/(c-5)*a;
Обнаружено непарных открывающих скобок: 1