Истинные: 1. земля круглая 2. лето наступает после весны 3. когда идет дождь - земля наполняется влагой 4. москва - столица россии 5. если горит красный сигнал светофора - оставайся на месте 6. сахар сладкий 7. арбуз - это ягода 8. лимон кислый 9. осенью опадает листва на деревьях 10. 1 января начинается новый год. ложные высказывания: 1. коровы летают 2. 2+2=5 3. информатика - наука о рыбах 4. глаза - органы слуха 5. киев - столица ирландии 6. год заканчивается летом 7. когда наступает ночь - светит солнце 8. солнце вращается вокруг земли 9. черепаха - самое быстрое животное в мире 10. соль горькая
Спасибо
Ответ дал: Гость
var slovo,simval: string; i,k: integer; begin k: =0; write('введите имя и фамилию '); readln(slovo); write('введите символ '); readln(simval); for i: =1 to length(slovo) do begin if slovo[i]=simval then k: =k+1; if slovo[i]=simval then writeln(i,' '); end; if k> =1 then writeln('да, встречается ',k,' раз, на позиции ',i)else writeln('нет'); end.
я немножко перевыполнил) от показывает есть симаол или нет, если есть то сколько раз он входит и на какой
Популярные вопросы