С КОНТРОЛЬНОЙ РАБОТОЙ ПО ИНФОРМАТИКЕ!
1. Определите значения соответствующих процедур и функций для строк
str1 :=‘dorogoj drug’
str2:= ‘drug’
а) k:= Length(Str1); k=?
б) s:=Copy(Str1, 4, 3); s=?
в) Delete(str1, 3, 4); str1=?
г) Insert(str1, Str2, 3); str1=?, str2=?
д) n:=Pos(str1, str2); n=?
2. Даны фрагменты программ. Нужно написать какой результат выводится на экран.
1)var str1,str2,str3 str4:string[25];
str1:='Дима сдал';
str2:='на отлично';
str3:='экзамен';
str4:= str1+'_ ' + str2+'_ '+ str3;
2)сравните две строки:
'Belka ' 'Bylka '
'Belka ' 'Belka '
'bylka ' 'Bylka '
'bylka ' 'bylk '
3) str1:='AB CD EF GH';
str2:='Сегодня прекрасный день ';
k1:=length(str1);
k2:=length(str2);
4) str1:='АБВГДЕЖЗИЙКЛ';
str2:='ABCDEFGH';
str3:=copy(str1,5,3);
writeln(str3);
writeln(copy(str2,1,4));
5) str1:='абвгдежзийкл';
delete(str1,2,5);
writeln(str1);
3.В данном тексте замените слово «тигр» на слово «кошка» и наоборот.
140
235
Ответы на вопрос:
Популярно: Информатика
-
qwerty66525.11.2020 10:18
-
Никита2OO719.06.2023 23:30
-
danilkuznets0108.01.2022 16:59
-
anara0105197913.02.2020 03:41
-
Dan1yar225512.09.2020 17:27
-
evsiukova8006.07.2020 18:41
-
Artem040531.07.2020 04:58
-
emuratov606Erali09.07.2022 14:07
-
uchenik001225.11.2021 12:07
-
Даня32455603.09.2022 12:56