Владимирович_Роман
?>

Какое логическое выражение равносильно выражению смотрите фото! (А \/ В) \/ С​

Информатика

Ответы

nikitamihailov22095010

№1

Program z1;

var N:integer;

Begin

write ('Введите число N: ');

readln(N);

if (N mod 2 = 0) and (N div 100 < 1) and (N > 9) then write('Данное число является четным двузначным') else if (N div 100 < 1) and (N > 9) then write ('Данное число не четное двузначное');

end.

 

№2

Program z2;

var a, b, c, k:integer;

Begin

k:=0;

writeln ('Введите числа a, b и c: ');

readln(a,b,c);

if a<0 then k:=k+1;

if b<0 then k:=k+1;

if c<0 then k:=k+1;

write('Количество отрицательных чисел: ',k)

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Какое логическое выражение равносильно выражению смотрите фото! (А \/ В) \/ С​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

veraplucnika
almihanika435
sakh2010kprf7
denbelousov963
zybin41iz81
antilopa001
katarinacorvus825
Александрович Алексеевна
fedorenkoroman
sancity997124
Елена-Олег
Adabir20156806
boykoz9
abramovae
fixer2006