Какое условие нужно поставить чтобы был ответ ‘yes’

X:=3; y:=8;

If then write(‘no’)

Else write(‘yes’)

1.1. x>y-2 1.2. x div y<y mod x

1.3. (x>y) or (x>0) 1.4. x+y div x< y+y mod x

Какое условие нужно поставить чтобы был ответ ‘yes’

X:=3; y:=8;

If then write(‘no’)

Else write(‘yes’)

1.1. x>y-2
1.2. x div y<y mod x

1.3. (x>y) or (x>0)
1.4. x+y div x< y+y mod x

n:=582;

X:= n div 100;

Y:= n mod 10

Z:=n mod 100 div 10;

If y= z then write ………

Фрагмент программы сравнивает:

7.1. десятки и сотни

7.2. десятки и единицы

7.3.единицы и сотни

​

// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!

1)

procedure Add(a,b:integer; var r:integer);
begin
  r:=a+b
end;

begin
  var (x,y):=ReadInteger2('Введите два целых числа:');
  var z:integer;
  Add(x,y,z);
  Writeln('Их сумма равна ',z)
end.

Пример
Введите два целых числа: 18 142
Их сумма равна 160

2)

function Min3(a,b,c:integer):=Min(a,Min(b,c));

begin
  var (i,j,k):=ReadInteger3('Введите три целых числа:');
  Writeln('Минимальное равно ',Min3(i,j,k))
end.

Пример
Введите три целых числа: 35 -4 41
Минимальное равно -4

3 Информация - совокупность сведений, знаний о чем-либо; сообщение - совокупность знаков , отображающих информацию.
4 Кодирование - зашифровка информации (перевод языка на азбуку Морзе),декодирование - расшифровка( расшифровка сообщения с азбуки Морзе,к примеру, на русский язык).
5 Кол-во информации предотвращает неопределенность.Неопределенность информации характеризуется энтропией, хаосом.
6 Актуализация информации - совокупность действий по обновлению, расширению, восстановлению информации для эффективности  ее использования.
7 Актуальность, полнота, доступность,понятность (т.е. понятна для восприятия)