Информатика 1) Запишите логическое выражение на языке алгебры логики: На каникулах мы пойдем в театр или в цирк. 15 делится на 3 и на 5. • Если сумма цифр числа делится на 3 без остатка, то число делится на
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018 Внимание! Если программа не работает, обновите версию!
begin var (x,y):=ReadInteger2('Введите через пробел два числа:'); if (x<0) or (y<0) then Writeln('Ввод отрицательных чисел недопустим') else begin while y>0 do (x,y):=(y,x mod y); Writeln('НОД=',x) end end.
Примеры Введите через пробел два числа: 14 -2 Ввод отрицательных чисел недопустим
Введите через пробел два числа: 32 76 НОД=4
2. Традиционный "школьный" код
var x,y,t:integer;
begin Write('Введите через пробел два числа: '); Read(x,y); if (x<0) or (y<0) then Writeln('Ввод отрицательных чисел недопустим') else begin while y>0 do begin x:=x mod y; t:=x; x:=y; y:=t end; Writeln('НОД=',x) end end.
Var a,b,i,nod:integer Begin a:=-1; b:=-1; //ввод первого числа Writeln('Введите первое число'); While a<0 do begin readln(a); if a<0 then writeln('Ввод ошибочен, повторите ввод первого числа'); end; //ввод второго числа Writeln('Введите второе число'); While b<0 do begin readln(b); if b<0 then writeln('Ввод ошибочен, повторите ввод второго числа'); end; //определение минимального числа if a>b then i:=b else i:=a; //перебор чисел от минимального до 0 (т.к. НОД не может быть больше минимального числа) While nod=0 do begin i:=i-1; if (a mod i = 0) and (b mod i = 0) then nod:=i; end; //вывод НОД Writeln('НОД ', a,' и ', b, ' = ', nod); end.
1) F = A v B
2) F = A ^ B
3) F = A => B
Объяснение:
1. Поход в театр - А; в цирк - B.
F = A v B
Использовали дизъюнкцию. Мы пойдём или А, или В.
2. 15 делится на 3 и на 5
F = 15, A = 3, B = 5
F = A ^ B
Использовали конъюнкцию. 15 делится и на А, и на В.
3. Если сумма цифр числа делится на 3 без остатка, то число делится на 3.
A - сумма цифр числа делится на 3 без остатка; B - число делится на 3
F = A => B
Использовали импликацию. Если сумма цифр числа делится на 3 без остатка, то само число делится на 3 без остатка.