fkn+antitotal

Урок 6 Задача10

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

var a:integer;
    b:real;

begin
  readln(a,b);
  writeln('pervoe chislo bolshe vtorogo ',a>b);
 readln();
  end.               

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

2 3
pervoe chislo bolshe vtorogo FALSE

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

Сравните число 8 и число 9.55, выведите результат сравнения на экран.

begin
  writeln(8>=9.55);
  readln();
  end.  

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

FALSE

Урок 6 Задача 8

Вычислите в тетради значения выражений (по шагам как в примерах урока выше):

true AND true OR (5>8)
false AND false OR (8>=8)
true AND ((5 true OR (8=9) OR false
true OR ((77+5)>99)
true OR (55 + 2 (2=2) OR true AND true
false OR (true AND true AND (22 > 4))

Урок 6 Задача 7

Вычислите в тетради значения выражений (по шагам как в примерах урока выше):
true AND true
false AND false
true AND (true AND true)
true OR false
true OR true
true OR true AND false
false OR true AND true
false OR (true AND true)
true OR (true AND true)
true OR (false AND true) OR true
true OR (false AND true) OR true AND false

Урок 10 задача 2

Пользователь вводит два целых числа, выведите на экран все числа между ними, причем:
Если первое больше второго то в порядке возрастания
Иначе в порядке убывания

program Project1;
var y, t:integer;
begin
 writeln('Введите целое число y');
 writeln('Введите целое число t');
  if ( y > t) then
    for y to t do
  else
    for y downto t do
 readln()
end.             

Урок 10 задача 1

Выведите на экран, все четные числа от 35 до 64.

program Project1;
var y:integer;
begin

  for y:=35 to 64 do
    if ((y mod 2) = 0) then
       write(y, ' ');

  readln();
end.         

Консоль:

36 38 40 42 44 46 48 50 52 54 56 58 60 62 64

Коля набрал k баллов, Миша n баллов, а Петя d баллов в ходе соревнований. Если:
сумма баллов Коли и Миши больше 20
или произведение баллов Пети и Миши меньше 55
--то тогда вывести в консоль сообщение о том, что ничья, в противном случае вывести сообщение, что победил Коля.

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

Пользователь вводит четыре числа, найдите из них максимальное -- решите через вложенные блоки if в полной форме (без использования логических операций).
Примечание: решение с помощью AND более удобно на практике, но для тренировки понимания тут мы решаем через вложенные блоки.

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

Коля набрал k баллов, Миша n баллов, а Петя d баллов в ходе соревнований. Если:
сумма баллов Коли и Миши больше 20
или произведение баллов Пети и Миши меньше 55
--то тогда вывести в консоль сообщение о том, что ничья, в противном случае вывести сообщение, что победил Коля.

Это инструкция описывает