Question

Запишите на языке Паскаль следующее условие: если а больше 3 и меньше 16 то вывести "да", иначе вывести "нет". В качестве оператора вывода используйте оператор write

Answer 1

if $a>3 and $a<16 then write('да') else write ('нет');

Answer 2

Конечно, вот как будет выглядеть данное условие на языке Паскаль с использованием оператора write:

pascalCopy code
var
  a: Integer;

begin
  // Ввод значения переменной 'a'
  write('Введите значение a: ');
  readln(a);

  // Проверка условия и вывод результата
  if (a > 3) and (a < 16) then
    write('Да')
  else
    write('Нет');

  // Завершение программы
  readln;
end.

В этом коде мы сначала объявляем переменную a типа Integer, затем пользователь вводит значение для переменной a. После этого мы проверяем условие: если a больше 3 и меньше 16, то выводим "Да", иначе выводим "Нет".