P = Val (Text1. Text) описать все что происходит в даной строке.

Program mm; var o, oo, v, n, n1, q1, r1, y1:string; l, x, b, z, y, r, q:integer; begin v:='вычислить '; read (n) ; n1:=n; q:=pos (' + or - ', n) ; q1:=copy (n, 1, q-1) ; val (q1, x, r) ; Delete (n, 1, q) ; r:=pos (' - or + ', n) ;

Написать подпрограмму для поиска максимального из всех двухзначных чисел в строке. Если в строке нет ни одного двухзначного числа, то подпрограмма должна вернуть 0. function CalcMax (s:string) : integer; с процедурой val

Размер окна текстового редактора - 20 строк по 64 символа в строке. Курсор находится в левом верхнем углу экрана и указывает на символ, стоящий в 25 - й строке и 5 - й позиции текста.

Пользователь работал с файлом c: Home/9klass/inf. doc. затем он поднялся на два уровня вверх создал католог text в нем создал еще один католог foto и переместил его в файл test. doc.

Определить какое из указанных имён файлов удовлетворяет маске: text*.*? f a. my_text. if b. my_text. pdf c. text. pdf d. text. f