Задать вопрос
ИнформатикаИнформатика
23 сентября, 12:47

Задан список из десяти

городов. (array [.]of string) Подсчитать количество названий, в которых нет буквы

"р".

+4
Ответы (1)
  1. 23 сентября, 15:06
    0
    Program chik;

    const n=10;

    var a:array[1 ... 100]of string;

    i, k:integer;

    begin

    for i:=1 to n do

    begin

    readln (a[i]) ; if (pos ('р', a[i]) = 0) then k:=k+1;

    end;

    writeln (k) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Задан список из десяти городов. (array [.]of string) Подсчитать количество названий, в которых нет буквы "р". ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
15. string s = "Я люблю программировать!"; int p = s. LastIndexOf ("") ; Console. WriteLine (p) ; 16. string s = "Я люблю программировать!"; string res=s. Remove (27) ; Console. WriteLine (res) ; 17.
Ответы (1)
Укажите правильное описание целочисленного линейного массива из 100 элементов. 1.) var B: array [1 ... 100] of real; 2.) var M: array [1 ... 100] of char; 3.) var A: array [0 ... 99] of string; 4.) var G: array [5 ... 104] of integer;
Ответы (1)
Какие описания массивов являются правильными с точки зрения компилятора языка Pascal? var a1: array[-1000 ... 50] of integer; const m1 = 20; m2 = m1*100; var a6: array[m1 ... m2] of - 200 ... 200; var a2: array[200 ...
Ответы (2)
Задача 1. Даны следующие описания массивов: var a, b : array [1 ... 10] of integer; var c : array [0 ... 9] of integer; var d : array [0 ... 10] of char; var e : array [1 ...
Ответы (1)
Отметьте все правильные объявления символьных строк. var s: string; var string: s; var s, s1, s2: array[1 ... 10] of char; var s1, s2: integer; var s, s1, s2: string;
Ответы (1)
Помогите с ответом
2, 4 диметилгексен3 структурная формула улеродный скелет цикл
Нет ответа
Какая масса алюминия прореагирует с хлоридной кислотой, если при этом выделится пять моль водорода?
Нет ответа
вывести формулу расчёта для решения задач типа: сколько граммов соли нужно добавить к А г а %-го раствора этой соли для получения в %-го раствора?
Нет ответа
Уравнения реакций взаимодействия пропена с водородом, бромом, бромоводородом
Нет ответа
При сгорании в хлоре 224 г порошка некоторого металла образовалось 650 г хлорида в котором данный метал трехвалентен. о каком металле идет речь
Нет ответа
Главная » Информатика » Задан список из десяти городов. (array [.]of string) Подсчитать количество названий, в которых нет буквы "р".
Регистрация Забыл пароль