Здравствуйте. Дам 20 баллов.Мне необходимо безотлагательно узнать значение слов в паскаль

Но для тебя это повод заработать лишние баллы

Ух, как грубо

ну хорошо, спасибо за помощь

сейчас 5 по практической информатике мне обещана

function ReadInteger(prompt: string): integer;
        Выводит приглашение к вводу и отдаёт значение типа integer, введенное с клавиатуры

function ArrRandom(n: integer := 10; a: integer := 0; b: integer := 100): array of integer;
        Отдаёт массив размера n, заполненный случайными целыми значениями

function Println(delim: string := ' '): sequence of T;
      Выводит последовательность на экран, используя delim в качестве разделителя, и перебегает на новую строку.

procedure Assert(cond: boolean; sourceFile: string := ''; line: integer := 0);
        Выводит в особом окне стек вызовов подпрограмм если условие не производится