Составить программу для вычисления значения

Demon11101995 · 23.12.2013, 17:39

необходимо составить программу для вычисления значения y,не используя логические операции (использовать if )
y=a AND (b OR c OR d)

Demon11101995 · 23.12.2013, 17:46

наработки
program ABC;
var a,b,c,d:boolean;
begin
a:=true
b:=true
c:=true
d:=true
if a then
if b then y:=true
else if c then y:=true
else if d then y:=true
else y:=false
writeln(y)
end

Demon11101995 · 23.12.2013, 17:46

нужно добавить else но куда????

Vladimir_S · 24.12.2013, 11:41

Цитата:

Сообщение от Demon11101995

необходимо составить программу для вычисления значения y,не используя логические операции (использовать if )
y=a AND (b OR c OR d)

Редкостный бред (я про задание). Ладно, получите:

Код:

Var
 y,a,b,c,d:boolean;
Begin
 if a then
  begin
   if b then y:=true else
   if c then y:=true else
   if d then y:=true else y:=false;
  end else y:=false
End.

23.12.2013, 17:39	#1 (permalink)
Demon11101995 Member Регистрация: 14.12.2013 Сообщений: 18 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Составить программу для вычисления значения необходимо составить программу для вычисления значения y,не используя логические операции (использовать if ) y=a AND (b OR c OR d)

23.12.2013, 17:46	#2 (permalink)
Demon11101995 Member Регистрация: 14.12.2013 Сообщений: 18 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	наработки program ABC; var a,b,c,d:boolean; begin a:=true b:=true c:=true d:=true if a then if b then y:=true else if c then y:=true else if d then y:=true else y:=false writeln(y) end

23.12.2013, 17:46	#3 (permalink)
Demon11101995 Member Регистрация: 14.12.2013 Сообщений: 18 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	нужно добавить else но куда????

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070