Змейкп
06.05.2023 17:59

Задачі
1. Записати висловлення формулою:
«Оскільки я ліг пізно спати, я проспав і не пішов на пару».

2. Для того, щоб отримати цю роботу, необхідно знати англійську або
німецьку мову ш не мати ШЗ.
3. Відомо, що висловлення істинне: «Якщо учень не знає логіки висловлень,
то він не зможе розв’язати логічну задачу». Які з наступних висловлень будуть
істинні, а які хибні? Які з висловлень будуть рівносильні даному?
1)Учень розв’язав логічну задачу. Отже, він знає логіку висловлень.

10

2) Учень не знає логіки висловлень. Отже, він не розв’яже задачу.
3) Учень знає логіку висловлень. Отже, він розв’яже задачу.
4) Учень не розв’язав задачу. Отже, він не знає логіки висловлень.
Перевірити за до таблиці істинності та за до спрощення
формули.
= “Учень знає логіку висловлень”;
= “Учень розв’яже задачу”.
Задане висловлення можна записати за формулою:​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Pots150204
03.02.2020 05:18
1.
Begin
 Writeln('Привет!');
 Writeln('Меня зовут Саша!');
 Writeln('Я студентка 2-ого курса начального образования!');
 Writeln('Я будущий учитель младших классов...');
end.

2.
var n:Integer;
Begin
 Read(n);
 Writeln('Квадрат =',n*n);
end.

3.
var a:Integer;
Begin
 Read(a);
 Writeln('S = ',a*a);
 Writeln('P = ',4*a);
end.

4. var n:Integer;
   Begin
     Read(n);
     Writeln(n+10);
  end.

5. var a,b:Integer;
   Begin
     Read(a,b);
     Writeln(' S = ',a*b);
     Writeln(' P = ',2*(a+b));
   end.

6. var a,b,c:Integer;
   Begin
     Read(a,b,c);
     Writeln('Сума = ',a+b+c);
   end.
0,0(0 оценок)
Ответ:
Reichale
03.02.2020 05:18

Ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.

var a,b,c,d,z:integer;

begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
while (z = 1) do
begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
end;

end. 

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота