Program prim; Var s, t: string; K: integer; Begin - вопрос №20578551 от shamsi3000 21.04.2022 15:39

Question

Информатика: Program prim; Var s, t: string; K: integer; Begin S:= Пришла зима”; k:= pos( _ , s); s t:= copy(s, k+1, 4); writeln (t); end.

shamsi3000 · Answer

Программа выведет: ПришОбъяснение:k = 0 (в строке S:= Пришла зима нет символа _ )t = Приш (копируем из строки S:= Пришла зима 4 символа начиная с первого)...

Program prim; Var s, t: string; K: integer; Begin S:= 'Пришла зима”; k:= pos('_', s); s t:= copy(s, k+1, 4); writeln (t); end.