Program prim; Var s, t: string; K: integer; Begin - вопрос №20578776 от deinefoxep08rm5 12.03.2021 22:04

Question

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

deinefoxep08rm5 · 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.