program p_1; var a,b: string; i,k: integer; begin k: =0; write('введите слово '); readln(a); write('введите символ '); readln(b); for i: =1 to length(a) do begin if a[i]=b then k: =k+1; if a[i]=b then writeln(i,' '); end; if k> =1 then writeln('да, встречается ',k,' раз, на позиции указанных сверху в столбик ')else writeln('нет'); end.
Ответ дал: Гость
я попробывала у меня получилось имя даша
Ответ дал: Гость
1)7-5=2 уч.-имеют две "3" по и по . 2)17-4-5-2=6 уч.-имеют две "3" по и по . 3)22-5-2-11=4 уч.-имеют две "3" по и по . 4)40-22-4-6-4=4 уч.-учатся без "3". 5)6+2+4=12 уч.-имеют "3" по двум предметам из трёх.
Ответ дал: Гость
а) наличие электромагнитного излучения, сrt б) ухудшение качества изображения при изменении угла обзора, crt в) компактные размеры lcd г) достаточно сильное ухудшение качества изображения при изменении рекомендуемой производителем разрешающей способности crt д) формирование изображения с лучей электронных пушек, crt е) меньший вред для здоровья человека при работе. lcd
Популярные вопросы