Есть ответ 👍

Задача 8
Напишите НАИМЕНЬШЕЕ число х, для которого ИСТИННО высказывание:
НЕ(x =50) ИЛИ НЕ(x >= 20)

Задача 11
Напишите НАИБОЛЬШЕЕ число х, для которого ЛОЖНО высказывание:
НЕ(x =20) ИЛИ НЕ(x >= 10)

Задача 13*
Напишите НАИМЕНЬШЕЕ число х, для которого ИСТИННО высказывание:
(x>14) И (x кратно 3) И (x кратно 2)

Задача 14*
Напишите НАИБОЛЬШЕЕ число х, для которого ИСТИННО высказывание:
(x 8) ИЛИ (x < 3)) И (

121
351
Посмотреть ответы 1

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

Dianochkach
4,5(14 оценок)

Var a,b,c: real; begin write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); if a> b then     begin     if a> c then a: =a/3     else c: =c/3;     if b< c then b: =b*3     else c: =c*3     end else     begin     if b> c then b: =b/3     else c: =c/3;     if a< c then a: =a*3     else c: =c*3     end; writeln; writeln('a = ',a); writeln('b = ',b); writeln('c = ',c); end.

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