1-Постройте таблицы истинности для следующих логических выражений: 1. A(AB) 2. (AB) 2-Найдите значения - id1871606420210530 от АлёнаКож 30.05.2021 17:47

Question

Информатика: 1-Постройте таблицы истинности для следующих логических выражений: 1. A(AB) 2. (AB) 2-Найдите значения выражений: 1. (10)(01) 2. (11)(01) 3-Найдите значение логического выражения ( X  4)  ( X  2) для указанных значений числа X: 1) 2 2) 3 3) 4 4) 5

АлёнаКож · Accepted Answer

Ну так правильно пишет , нельзя писать if b>a>c
then begin , пишется правильно так if (c>b) and (b>a)then begin , вообщем вот держи ;

Program qq;var a,b,c,max,min,med : longint;beginwriteln ('введите три числа');read (a,b,c);if (c>b) and (b>a)then beginmax := c;med := b;min := a;End;if (b>a) and (a>c)then beginmax := b;med := a;min := c;End;if (a>c) and (c>b)then beginmax := a;med := c;min := b;End;writeln ('наибольшее число', max);writeln ('среднее число', med); writeln ('наименьшее число', min);End.

MOGZ ответил