Задание
ss:='крокодильчики';
for i:=0 to length\(ss\) do
if ss
readln;
end.
Что будет выведено на экран в результате выполнения программы:
var sc: set of char; ss: string;
i: integer;
begin
sc:=
\['а','е','и','о','у','э','ю','я'\]
;ss:='крокодильчики';
for i:=0 to length\(ss\) do
if ss
\[i\]
in sc then write \(ss⟨1⟩\);readln;
end.
- Программа вызовет ошибку при компиляции
- ¶ooиии
- ¶oи
- ooиии
- oи
- oии
- Программа вызовет ошибку при выполнении