Даны 2

слова в 2-х разных переменных одинаковой

длины. Образовать новую последовательность

в которой должны чередоваться буквы

первого, второго слова, в обратном

порядке, (не

использовать pos

) паскаль))

Имеется некоторая последовательность символов. Образовать новую последовательность, включив в нее символы исходной, кроме запятых. (использовать склейку "+") (не использовать pos, delete, copy ...)

Имеется некоторая последовательность символов. Образовать новую последовательность, пропустив пробелы. (использовать склейку "+") (не использовать pos, delete, copy ...) на паскале!

Сделать из программы процедуру pascal Program kokokoko; uses crt; var fr, frn, s1:string; i:integer; begin clrscr; writeln ('Vvedite frazu:') ; readln (fr) ; fr:=fr+' '; While Pos (' ', fr) >0 do Begin s1:=Copy (fr, 1, Pos (' ', fr) - 1) ;

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) ;

Ввести слово и число раз (Ввод; паскаль, 3). Вывести это слово так: паскаль паскаль паскаль паскаль паскаль паскаль