с клавиатуры вводится строка, дать ответ, встречается ли в ней слово "зима"

паскал. с++. питон ?

обычную программу напиши пж в Паскаль

решение напиши

flag:=false; read(s); for i:=1 to length(s)-3 do if s[i]='з' and s[i+1]='и' and s[i+2]='м' and s[i+3]='а' then flag:=true; if flag = true then writeln('have');

а где слова зима

на каком языке тебе ?