Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Помогите решить задачу в паскале!!!

5-9 класс

Дана строка S и символ C. определить есть ли символ C в строке S

Irina736 09 июня 2014 г., 11:13:54 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
KeryKery17
09 июня 2014 г., 11:46:05 (9 лет назад)

Паскаль

Откомпилирован в: Pascal ABC

 

program z1;
uses crt;
var
   s: string;
   c: char;
   i: integer;
begin
     write('  Vvedite strocy:  ');
     readln(s);
    
     writeln();
    
     write(' Vvedite sivol dl poiska:  ');
     readln(c);
    
     writeln();
     for i := 1 to length(s) do
     if s[i] = c then //
     begin
          writeln(' Simvol prinadlech stroce = ', s);
          break;
     end;
     if s[i] <> c then writeln(' Simvola net v stroke = ', s);
end.

Ответить

Другие вопросы из категории

Заранее спасибо
120 БАЛЛОВ!!!

Решить задачу с помощью схемы:

Увлечения.

Витя, Саша, Андрей и Толя собирали модели
самолетов. Двое делали модели из белой пластмассы, а двое – из серой. Саша и Андрей,
Саша и Толя делали модели из пластмассы разного цвета. Получились три модели
самолетов «Ту» и одна – «Су».

Какую модель и из какого
материала делал каждый из мальчиков, если Саша делал модель самолета «Су» из
белой пластмассы

Читайте также

PASCAL. нужна помощь. ПОЖАЛУЙСТА помогите решить задачу в PASCAL (если рОЧЕНЬ нужна помощь. ПОЖАЛУЙСТА помогите решить задачу в PASCAL (если решиш - проси

что угодно, помогу)Вот задача - Под конец учебного года ученики 11 класса решали понять у кого же из них будет самый высокий средний балл ? Известно , что - в классе учится 14 учеников, - Сумма всех средних баллов аттестата = 100.Известно также , что первый ученик имел средний балл, который составляет 1/ 12 суммы всех средних баллов. Второй ученик - на 0,15 % больше, чем первый ученик , но на 1,75 % меньше , чем третий ученик . Средние баллы аттестатов двух сестер были равными среднему арефметичному оценок вышеупомянутых учеников , разделенном на 1.5 . Четвертый ученика на конец года имел такой же балл , как и первый ученик , но на 5% меньше , а остальные ученики - имели равные баллы .Какой средний балл на конец года получил каждЫй?

пожалуйста, помогите решить задачи по Паскалю!!!

1) Даны два числа. Составить алгоритм и перевести его на язык программирования, который меньшее из них возводит в квадрат, а большее оставляет без изменения,

ПОМОГИТЕЕ


Помогите решить задачи на паскаль.

1)
Дан массив случайных чисел (количество элементов
вводите с клавиатуры). Найти произведение всех элементов массива.



Вы находитесь на странице вопроса "Помогите решить задачу в паскале!!!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.