Program bit;
var m,a1,a2,a3:
integer;
begin
writeln('введите три числа');
readln(a1,a2,a3);
if (a1<a2) and (a1<a3) then m:=a1;
if (a2<a1) and (a2<a3) then m:=a2;
if (a3<a1) and (a3<a2) then m:=a3;
if (a1=a2) and (a1=a3) then
writeln('они равны')
else writeln('меньшее из трёх ',m);
<span>end.</span>
Готово.................
<span>1-г
2-в
3-д
4-а
5-б</span>
Входные данные
Во входных строках записаны целые числа, по одному в каждой строке. В последней строке записано число 0.
Выходные данные
Программа должна вывести в одной строке сумму и произведение введённых чисел (не считая завершающий 0), разделив их пробелом.
Примеры
входные данные
1
2
3
0
выходные данные
6 6
<span>// вообще не понимаю, выводит сумму правильно, а произведение всегда 0. (возможно считывает 0</span>
AB+A!B=A(B+!B)=A
!(X+Y)(X!Y)=(!X!Y)(X!Y)= 0
!XY+!(X+Y)+X = !XY+!X!Y+X = !X(Y+!Y)+X = !X+X = 1
(X+Y)(!X+Y)(!X+!Y) = F
(X+Y)(!X+Y) = X!X+XY+Y!X+YY = 0+XY+Y(!X+1) = XY+Y= Y(X+1) = Y
Y(!X+!Y)=Y!X+Y!Y=Y!X
(X+Y)(!X+Y)(!X+!Y) = Y!X
5 пример особо не упростишь
!(XY+!Z)=!(XY)Z=(!X+!Y)Z
1 замкнутая область.2 ограниченная.3 если в равенстве