Pascal Next. Руководство программиста. Никита Борисович Культин
Чтение книги онлайн.

Читать онлайн книгу Pascal Next. Руководство программиста - Никита Борисович Культин страница 3

СКАЧАТЬ в массиве (найдено)

      i: integer;

      begin

      for i:= 1 to HB do

      a[i] := Random(HB);

      end;

      r:= Random(HB);

      writeln('Search: ',r);

      found := FALSE; // пусть число не найдено

      i:= 1;

      repeat

      if a[i] = r then

      found := TRUE; // число найдено

      else

      i:=i+1;

      end;

      until( found = TRUE) OR (i > HB);

      if found = TRUE then

      writeln('Found!');

      else

      writeln('Not found!');

      end;

      write('Press <Enter>');

      readln;

      end.

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

      Вывод информации на экран (в окно консоли) выполняют инструкции write и writeln.

      В общем виде инструкции записываются так:

      write(список_вывода);

      writeln(список_вывода);

      Где:

      список_вывода – разделенные запятыми имена переменных, строковые константы или выражения.

      Примеры:

      write(sum);

      write('Press <Enter>');

      writeln('x1=', x1, ' x2=', x2);

      writeln(pound,' фунтов =', pound*0.453, ' кг.');

      Форматированный вывод

      В строке вывода после имени переменной или выражения через двоеточие можно задать формат вывода значения.

      Для целых и строковых значений формат задает ширину поля вывода – количество позиций на экране, которое резервируется для вывода значения переменной.

      В общем виде форматированный вывод целых и строковых значений задается так:

      имя:n

      Где:

      имя – имя переменной , значение которой надо вывести на экран;

      n – ширина поля вывода (целая константа).

      Форматированный вывод вещественных значений в общем виде задается так:

      имя:n:m

      Где:

      имя – имя переменной;

      n – ширина поля вывода (целая константа);

      m – количество цифр дробной части.

      Примеры:

      writeln('x1=', x1:9:3, 'x2=', x2:9:3); // x1 и x2 – вещественного типа

      writeln(name:15, salary:12:3); // переменная name строковая, salary – вещественная

      writeln(pound:5:2,' фунтов =', pound*0.453:6:3, ' кг.'); // выражение pound*0.453 вещественного типа

      Ввод данных с клавиатуры

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

      readln(имя);

      Где:

      имя – имя переменной, значение которой надо получить от пользователя во время работы программы.

      Примеры:

      readln(name);

      readln(salary);

      ВНИМАНИЕ! При вводе вещественных значений в качестве десятичного разделителя следует использовать точку. Если при вводе вещественного значения вместо точки будет введена запятая, ошибка (исключение) не возникает, СКАЧАТЬ