fkn+antitotal

урок 9 задача 6

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

урок 9 задача 5

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

урок 9 задача 4

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

var
  m, n: real;
  begin
    writeln('vvedite dva chisla: ');
    readln(m, n);
    if (m > n) then
      writeln(12)
    else
      writeln(888);
   readln();
  end.          

урок 9 задача 3

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

var i, n: integer;

begin

  writeln('vvedite dva chicla: ');
  readln(i, n);
  if (i > n) then
    writeln(12);
  readln();
end.                        

Задача 19 Урок 3

У вас есть целочисленная переменная a и два строковых литерала:

'У Васи'

и второй:

'яблок'

Присвойте переменной a значение и выведете на экран фразу с этим значением -- используя указанные выше литералы (можно не только их, но их обязательно), например для:

a:=5;

Должно выводиться:

Возможный вариант установки для pdo_pgsql:

FROM php:8.1-fpm-alpine3.14

RUN apk --no-cache update \
    && apk add --no-cache autoconf g++ make \
    postgresql-dev \
    \
    && docker-php-ext-configure pgsql -with-pgsql=/usr/local/pgsql \
    \
    && docker-php-ext-install pdo_pgsql

-т.е. тут:

1. сначала ставится пакет postgresql-dev
2. потом конфигурируется pgsql параметром -with-pgsql=/usr/local/pgsql
3. и только затем устанавливается само расширение pdo_pgsql

Делаем так:

1. Подключаемся в командную оболочку запущенного контейнера с php, который "знает" команду docker-php-ext-install
2. Выполняем эту команду:
   

   docker-php-ext-install

Задача 18 Урок 3

Напишите программу, которая выводит на экран значения выражений:

5 + 2*3
6+7
8*9

двумя способами (чтобы в консоли получилось оба варианта):

• в столбик
• в строчку, разделив пробелами

begin
  writeln(5+2*3);
  writeln(6+7);
  writeln(8*9);
  write(5+2*3,' ');
  write(6+7,' ');
  write(8*9);
  readln;
end.

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

11
13
72
11 13 72

Урок 13.1. Задача 11.

Пользователь вводит числа до тех пор пока им не будет передан ноль. В ответ на каждое число программа должна сообщать чётное оно или нет.

var m : integer;

begin
  m := 1;
  while (m <> 0) do
  begin
    write('Enter an integer : ');
    readln(m);
    if (m mod 2 = 0) then
      writeln('This number is even')
    else
      writeln('This number is odd');
  end;
  readln();
end.

Урок 13.1. Задача 10.

Модифицируйте предыдущую задачу так, чтобы в каждой чётной (той, у которой номер чётный) строке выводилось N символов, а в каждой нечетной N/2 символов (сделайте проверку того, что N/2 больше нуля)