fkn+antitotal

Задача 9 Урок 9

Пользователь вводит четыре числа, найдите из них максимальное -- решите через вложенные блоки if в полной форме (без использования логических операций).

Задача 8 Урок 9

Пользователь вводит три числа, найдите из них максимальное.

Решите тремя способами:

1. С использованием логической операции and.
2. С вложенными блоками (без and, все операторы if должны быть в полной форме).
3. Без вложенных блоков (без and) -- запомнив максимум из первых двух чисел в специальной переменной.

Задача 7 Урок 9

Пользователь вводит два числа, найдите из них максимальное. (тут всё просто)

var A,B:integer;
begin
  writeln('Input first number');
  readln(A);
  writeln('Input second number');
  readln(B);
  if (A > B) then
     writeln('Max number is ', A)
  else
     if (B > A) then
         writeln('Max number is ', B)
     else writeln('Numbers are equal');
  readln();
end.

Задача 6 Урок 9

Даны три целых числа: A, B, C. Проверить истинность высказывания: « Число A и число B больше 17, а C > 7». -- выведите "да", если истинно и "нет" если ложно.

var A,B,C:integer;
begin
  A:=23;
  B:=22;
  C:=15;
  if ((A > 17) AND (B > 17) AND (C > 7)) then
     writeln('Yes')
  else
     writeln('No');
  readln();
end.

Задача 5 Урок 9:

Даны три целых числа: A, B, C. Проверить истинность высказывания: «Число A находится между числами B и C» -- выведите "да", если истинно и "нет" если ложно.

var A,B,C:integer;
begin
  A:=13;
  B:=12;
  C:=15;
  if ((A > B) AND (A < C)) then
     writeln('Yes')
  else
     writeln('No');
  readln();
end.

Задача 4 Урок 9:

Сравните два числа, если первое больше второго, то выведите на экран "12", а если нет, то выведите на экран "888".

var first, second:real;
begin
  randomize;
  first:=random();
  writeln(first);
  second:=random();
  writeln(second);
  if (first > second) then
     writeln(12)
  else
     writeln(888);
  readln();
end.

Задача 3 Урок 9:

Сравните два числа, если первое больше второго, то выведите на экран "12". (здесь нужно использовать неполную форму условного оператора)

var first, second:real;
begin
  randomize;
  first:=random();
  writeln(first);
  second:=random();
  writeln(second);
  if (first > second) then
     writeln(12);
  readln();
end.

Чтобы метод нельзя было вызвать из тела программы есть два варианта:

LTS -- сокращение от "Long term support", т.е. "долговременная поддержка"

LTS-версия какой-либо программы - это версия с долгой поддержкой (для которой дольше чем для других версий выпускаются обновления).

Например для версий Ubuntu Linux далеко не все версии, являются LTS, например:

• 18.04 - LST
• 19.04 - обычная (не LTS)
• 20.04 - LTS
• 21.04 - обычная (не LTS)

Чтобы узнать какая версия ноды на данный момент является долговременной (LTS), можно:

• Либо зайти на главную страницу https://nodejs.org/en/ и посмотреть на какая версия указана на кнопке с постфиксом LTS
• Либо посмотреть таблицу/диаграмму на гитхабе