|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
25.11.2013, 21:35 | #1 |
Пользователь
Регистрация: 20.10.2013
Сообщений: 15
|
pascal abc.тема:строки.Нарисуйте пожалуйста блок-схему
var s,s1:string;
n,i:integer; begin writeln('введите слова'); readln(s); if (pos('но',s)<>0) and (pos('он',s)<>0) then writeln('yes') else writeln('no'); end. |
26.11.2013, 08:07 | #2 |
Негодник
Форумчанин
Регистрация: 10.11.2009
Сообщений: 880
|
Советую перевестись на филфак. Только время и деньги зря потратите при таком подходе к учебе.
Если помог, проси поставить минус. Будь оригинален!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
pascal abc.нарисуйте блок-схему пожалуйста | sfuwf | Помощь студентам | 2 | 14.11.2013 07:05 |
Pascal ABC(нарисуйте пожалуйста блок-схему) | sfuwf | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 20.10.2013 19:31 |
Нарисуйте пожалуйста блок-схему лёгкой задачки, не знаю как,очень нужно... | prikolist | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 28.11.2008 15:27 |
Нарисуйте блок-схему за деньги | cHEg | Фриланс | 1 | 25.11.2008 18:15 |