Определите, какому десятичному числу соответствует двоичный код 00111111

Получилось: число 63 перевёл в десятичную систему счисления

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

1. Традиционное решение.

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
var
  s:string;
  i,k:integer;
begin
  Write('Введите строку: '); Readln(s);
  k:=0;
  for i:=1 to Length(s) do
    if s[i]=' ' then Inc(k);
  Writeln('Количество слов равно ',k+1)
end.

Результат выполнения программы:
Введите строку: А роза упала на лапу Азора
Количество слов равно 6

2. Решение срeдствами PascalABC.Net 3.1

// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
  var s:=ReadlnString('Введите строку:');
  Writeln('Количество слов равно ',s.ToWords.Count)
end.

Результат выполнения программы:
Введите строку: А роза упала на лапу Азора
Количество слов равно 6

а) var x,y: real;

б) var a,b,s: real;

(a,b - стороны прямоугольника, s - площадь прямоугольника)

в) var k:integer;

ct,co,s: real;

(k - количество тетрадей, ct,co - стоимость 1 тетради и 1 обложки (соответственно), s - стоимости покупки)

г) var kt,kk,kr:integer;

ct,ck,cr,s: real;

(kt,kk,kr - количество тетрадей, карандашей и ручек (соответственно), ct,ck,cr - стоимость 1 тетради, 1 карандаша и 1 ручки (соответственно), s - стоимость покупки)

Данные вещественного (real) типа используются значительно чаще целого типа. Они необходимы в тех случаях, когда числовые значения могут содержать дробные части.

Данные целочисленного (integer) типа используются для представления целых чисел.