fkn+antitotal

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

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

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

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

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

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

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

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

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

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

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

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

var a, b: integer;
begin
  writeln ('Введите два числа: '); //пояснение пользователю
  readln (a, b); //считываем введенные числа
  if (a > b) then //пишем условие, сравниваем
    writeln (12); //выводим на экран, если условие верное
  readln (); //удерживаем консоль
end.
 

Вывод консоли:

12

Знак вопроса и двоеточие - что это в регулярных выражениях

Ответ

Это так называемая "non-capturing group". Подробности придется поискать

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

У вас есть код:

var f : integer;
begin
  write('Введите число : ');
  readln(f);
  if f = 0 then
  else
    writeln('Не равно 0!');
 
  readln();
end.

-- который сообщает пользователю, что число не равно нулю, если это действительно так, или в обратной ситуации не делает вообще ничего.

Задача: Перепешите это код в неполной форме (без использования else).

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

Изучите код:

var s, t:integer;
    f, b:boolean;
begin
  f := true;
  b := false;
 
  if (f=true) then
    t:=1
  else
    t:=2;
 
  if (b=false) then
    s:=3
  else
    s:=4;
end. 

-- блоки условий можно переписать более кратко, без использования сравнения = true или = false, с сохранением той же логики работы программы.

Подсказки:

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

Пользователь вводит целое число, если оно больше единицы, то выведите на экран все целые числа от этого числа до единицы (в обратном порядке), которые делятся на 23 без остатка. Иначе (если введённое пользователем число не больше единицы) сообщите об ошибке.

Решение: