Регистрация
andrej1790
19.03.2023 07:40
Информатика
Есть ответ 👍

Анализ истинности высказывания с числами (Если можно, напишите пояснения!)

1. Напишите наименьшее число x, для которого ложно высказывание:

(x < 42) ИЛИ (x не делится на 19)

2. Напишите наибольшее число x, для которого ложно высказывание:

(x > 95) ИЛИ НЕ (x кратно 14)

3. Напишите наибольшее число x, для которого истинно высказывание:

(x < 62) И (x кратно 19)

4. Напишите наименьшее число x, для которого истинно высказывание:

НЕ (x ≤ 53) И НЕ (x не делится на 53)

5. Напишите наименьшее число x, для которого ложно высказывание:

НЕ (x ≥ 35) ИЛИ (x не делится на 16)

6. Напишите наибольшее число x, для которого истинно высказывание:

НЕ (x > 43) И НЕ (сумма цифр числа x меньше 9)

7. Напишите наибольшее число x, для которого истинно высказывание:

НЕ (x > 47) И НЕ (сумма цифр числа x больше 6)

8. Напишите наибольшее число x, для которого истинно высказывание:

НЕ (x > 38) И НЕ (сумма цифр числа x не равна 4)

9. Напишите наибольшее число x, для которого истинно высказывание:

НЕ (x > 38) И НЕ (сумма цифр числа x равна 11)

10. Напишите наибольшее число x, для которого истинно высказывание:

НЕ (x > 55) И НЕ (в числе x есть одинаковые цифры)

249
398
Посмотреть ответы 2

Ответы на вопрос:

yliana262626
yliana262626
4,5(23 оценок)

var c,a,b,i,j,l:integer;

begin

cls;

write('Введите через пробел отрезок');

read(a,b);

 for i:=a to b+1 do

 begin

  j:=2;

  l:=round(sqrt(i));

  while (i mod j <> 0) and (j <= l) do

                                      begin

                                       inc(j);

                                      end;

   if (j > l) then

                  begin

                   write(c,' ');

                   c:=i;

                  end;

 end;

end.

Объяснение:

lera1066
lera1066
4,5(83 оценок)
Ну короче код в файле. там если выполняется условие то "верно", а если нет "не верно".

Популярно: Информатика