Таблица истинности

@ApeFake · Регистрация: 15.11.2021

Здравствуйте.
Помогите решить задачу по схемотехнике. Нужно сделать таблицу истинности по рисунку и УГО.

@WH · 12.03.2022, 17:10

Это же совсем простое задание. Вручную посчитать за пару минут можно. Всего то почитать про логику исключающего или. Но можно и на машине.

Fortran

program main
implicit none
 
integer, dimension (4, 16) :: a
integer :: i, x1, x2, x3, x4, y1, y2, y3, y4
 
 !Таблица состояний входов
 data a/0,0,0,0,  &
        0,0,0,1,  &
        0,0,1,0,  &
        0,0,1,1,  &
        0,1,0,0,  &
        0,1,0,1,  &
        0,1,1,0,  &
        0,1,1,1,  &
        1,0,0,0,  &
        1,0,0,1,  &
        1,0,1,0,  &
        1,0,1,1,  &
        1,1,0,0,  &
        1,1,0,1,  &
        1,1,1,0,  &
        1,1,1,1/
 
    !Посчитаем все варианты и выведем результат
    do i = 1, 16
        x1  = a(1,i); x2=a(2,i); x3=a(3,i); x4=a(4,i)
        y1  = xor (x1, x2)
        y2  = xor (x2, x3)
        y3  = xor (x3, x4)
        y4  = x4
        print '(4i2, a, 4i2)', x1, x2, x3, x4, "   выход = ", y1, y2, y3, y4
    end do
end program main

Код

 0 0 0 0   выход =  0 0 0 0
 0 0 0 1   выход =  0 0 1 1
 0 0 1 0   выход =  0 1 1 0
 0 0 1 1   выход =  0 1 0 1
 0 1 0 0   выход =  1 1 0 0
 0 1 0 1   выход =  1 1 1 1
 0 1 1 0   выход =  1 0 1 0
 0 1 1 1   выход =  1 0 0 1
 1 0 0 0   выход =  1 0 0 0
 1 0 0 1   выход =  1 0 1 1
 1 0 1 0   выход =  1 1 1 0
 1 0 1 1   выход =  1 1 0 1
 1 1 0 0   выход =  0 1 0 0
 1 1 0 1   выход =  0 1 1 1
 1 1 1 0   выход =  0 0 1 0
 1 1 1 1   выход =  0 0 0 1

@ApeFake 1 / 1 / 0 Регистрация: 15.11.2021 Сообщений: 58
		1
	Таблица истинности 01.03.2022, 10:21. Показов 336. Ответов 1 Метки нет (Все метки) Здравствуйте. Помогите решить задачу по схемотехнике. Нужно сделать таблицу истинности по рисунку и УГО. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы