fkn+antitotal

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

var
  a,b,c: integer;

begin
    writeln('Vvedite chisla A, B: ');
    writeln('Vvedite A: ');
    readln (a);
    writeln('Vvedite B: ');
    readln (b);

    writeln('max:');
    if ( a > b ) then
    writeln(a)
    else
    if (b > a)  then
    writeln(b);

    readln ();
  end.
          

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

var
  a,b,c: integer;

begin
    writeln('Vvedite chisla A, B, C: ');
    writeln('Vvedite A: ');
    readln (a);
    writeln('Vvedite B: ');
    readln (b);
    writeln('Vvedite C: ');
    readln (c);

    if ( a > 17 ) and ( b > 17) and ( c > 7 ) then
    writeln('da')
    else
    writeln('net');
    readln ();
  end.
          

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

var
  a,b,c: integer;

begin
    writeln('Vvedite chisla A, B, C: ');
    writeln('Vvedite A: ');
    readln (a);
    writeln('Vvedite B: ');
    readln (b);
    writeln('Vvedite C: ');
    readln (c);

    if ( a > b ) and (a < c) then
    writeln('da')
    else
    writeln('net');
    readln ();
  end.
        

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

var a,b: integer;

begin
    writeln('Vvedite chisla: ');
    readln (a,b);

    if ( a > b ) then
    writeln('12')
    else
    writeln('888');
    readln ();
  end.
           

Задача 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, с сохранением той же логики работы программы.

Решение:

Если нужен текстовый поиск, то можно из главного меню:

Search
 -> DB Full-Text

урок 10.2 задание 2

В примере №2 есть код, который описывает программу угадывания числа с трех попыток. Перепишите этот код так, чтобы

:

урок 10.2 задание 1

Модицифируйте код:
var i:integer;
begin
for i:=1 to 10 do
begin
writeln(777);
break;
end;

readln();
end.
-- таким образом, чтобы на 4-ом витке на экран было выведено число 777, а на 5-ом произошел выход из цикла (при этом строчку for i:=1 to 10 оставьте без изменений).

\

решение

Ошибка связанная с

"temporary:///.htaccess" "Path cannot be empty"

наблюдалась при попытке открыть в даминке адрес вида:
http://mysite.loc/admin/config

Возможное решение

Ошибка может быть связана с недоступностью для записи диретории, которая назначена у вас для хранения временных файлов.
Посмотреть что назначено можно в админке по адресу:

enter password to unlock the private key