2004by2013

09.03.2021 15:51 •  Другие предметы

Даны фрагменты программ. нужно написать какой результат выводится на экран.

7)var str1,str2,str3 str4: string[25];

str1: ='дима сдал';

str2: ='на отлично';

str3: ='экзамен';

str4: = str1+'_ ' + str2+'_ '+ str3;

8)сравните две строки:

'belka ' 'bylka '

'belka ' 'belka '

'bylka ' 'bylka '

'bylka ' 'bylk '

9) str1: ='ab cd ef gh';

str2: ='сегодня прекрасный день ';

k1: =length(str1);

k2: =length(str2);

10) str1: ='абвгдежзийкл';

str2: ='abcdefgh';

str3: =copy(str1,5,3);

writeln(str3);

writeln(copy(str2,1,4));

11) str1: ='абвгдежзийкл';

delete(str1,2,5);

writeln(str1);

12) str1: ='abcdef';

str2: ='abcdef';

insert(str1,str2,5);

insert(str2,str1,4);

13) str1: ='абвгдежзийкл';

str2: ='бвгдежзийкл';

k1: =pos(str2,str1);

k2: =pos(str1,str2);

10) str1: ='абвгдежзийкл';

str2: ='abcdefgh';

str3: =copy(str1,5,3);

writeln(str3);

writeln(copy(str2,1,4));

11) str1: ='абвгдежзийкл';

delete(str1,2,5);

writeln(str1);

12) str1: ='abcdef';

str2: ='abcdef';

insert(str1,str2,5);

insert(str2,str1,4);

13) str1: ='абвгдежзийкл';

str2: ='бвгдежзийкл';

k1: =pos(str2,str1);

k2: =pos(str1,str2);

​