fkn+antitotal

Урок 6 задача 14

пользователь вводит четыре числа, проверьте, что первое больше третьего и при этом (одновременно второе меньше четвертого).

program Project1;
var
a,b,c,d:integer;
n:boolean;

begin
   write('Введи числа через Enter A, B, C, D: ');
   read(a, b, c, d);
   readln();
   n:=(A > C) and (B < D);
   writeln('Ответ =  ', n);
   readln();
end.  

Консоль

Введи числа через Enter A, B, C, D: 54
45
65
23
Ответ =  FALSE

Урок 6 задача 13

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

program Project1;
var;
a, b, c:integer;
n:boolean;

begin
  writeln('Введи числа A, B, C= ');
  readln(a, b, c);
  readln();
  n:=(A > 17) and ( B > 17) and (C > 17);
  writeln('Результат' , '(A > 17) and (B > 17) and (C > 17)  =  ',n);
  end.       

Извлекать данные можно с точностью до микросекунд, см. документацию по timestapmz

Извлечение в формате по умолачанию:

SELECT  "scenario_details"."date_updated" 
 FROM "scenario_details" LIMIT 3;

Извлечение с указанием формата:

SELECT 
to_char("scenario_details"."date_updated", 'YYYY-MM_DD HH24:MI:SS:US') 
 FROM "scenario_details" LIMIT 3;

[к оглавлению]

Что это такое

До этого мы с вами рассматривали синтаксис различных SQL-запросов, работающих с данными в базе. К примеру, запрос SELECT извлекает наборы строк, соответствующих установленным условиям. Эти наборы могут иметь ноль, одну и более строк. И они называются результирующими.

Результирующий набор

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

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

Получите от пользователя четыре строковых значения, выведете на экран результат проверки условия:

var

 a,b,c,f :string;
begin
 writeln('присвойте значение 4 строковым литералам по 3 буквы');
 readln(a,b,c,f);
 writeln(a=c and a=f or f=c);

 readln();
end.                          

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

Получите от пользователя три произвольных строки, одним выражением выполните конкатенацию следующим образом:

var

 a,b,c, :string;
begin
 writeln('присвойте значение 3 строковым литералам по 3 буквы');
 readln(a,b,c,);
 writeln(a+b+c+);

 readln();
end.                                 

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

Получите от пользователя 5 строк, сложите их и выведите полученный результат на экран.

var

 a,b,c,d,f :string;
begin
 writeln('присвойте значение 5 строковым литералам по 3 буквы');
 readln(a,b,c,d,f);
 writeln(a+b+c+d+f);

 readln();
end.                     

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

Объявите 5 переменных строкового типа. Одной из них присвойте значение и выведете значение этой переменной на экран.

program 228;

var

 a,b,c,d,f :string;
begin
a:='ask';
 writeln(a);
 readln();
end.       

Инструкция из серии:

Дважды щелкните мышью имя монтажного кадра на панели «Монтажный кадр» и введите новое имя.

не работает т.к. в AA 19.0 просто нет панели:

Выберите меню «Окно» > «Другие панели» > «Монтажный кадр».

Действуем так:

1. Выделяем на верхнем уровне все слои (или на том уровне, где мы хотим искать в т.ч. среди вложенных слоев-потомков)
2. Нажимаем комбинацию клавиш Ctrl+F
3. Вводим поисковую фразу/слово и нажимаем "Найти все" (Find All)

Далее можно просто перемешаться между найденными слоями клика на элементы найденные с помощью поиска (каждый раз вводить фразу не нужно, если вам не требуется ее поменять)