сервис вопросов и ответовЗадан список из десяти
5-9 класс|
|
городов. (array [.]of string)Подсчитать количество названий, в которых нет буквы
«р».
Yupona
18 марта 2017 г., 18:40:57 (7 лет назад)
Fran1984
18 марта 2017 г., 21:11:35 (7 лет назад)
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.
Коралина1515
18 марта 2017 г., 22:23:32 (7 лет назад)
ставь ЛУТШЕЕ РЕШЕНИЕ(обычно мне это не надо но как-то хочу поменят статус до светило науки
Ответить
Другие вопросы из категории
СРОЧНО!!! ПРОСТО НАПИСАТЬ РЕШЕНИЕ!!!! Как в программе Free Pascal.
Заданы 3 действительных числа. Посчитать количество целых чисел. Использовать функцию int(a)-целая часть числа а.
1)Что такое информационный кризис?
2)Взаимозависимость компьютеризации общества и развития информационного кризиса.
3)Почему затягивают сети?
4)Что выбирает новое поколение:письмо ручкой или движение мышкой?
5)Положительное и отрицательное влияние информатизации.
Выберите правильный ответ.
а) Если вы собираетесь провести выходной день на природе, то своевременной информацией для вас будет:
1) сведения о погоде в такой же день прошлого года;
2) прогноз погоды на выходной день.
б) Волга впадает в Каспийское море - это:
1) достоверная информация;
2) недостоверная информация.
в) Слухи, вымыслы, непроверенные гипотезы - это;
1) достоверная информация;
2) недостоверная информация.
г) Информация о том, как с помощью подручных средств добыть огонь, будет для вас наиболее полезной;
1) если вы попадёте на необитаемый остров;
2) в нашей повседневной жизни.
д) О правилах дорожного движения каждый водитель автомобиля;
1) должен обладать полной информацией;
2) может иметь неполную информацию.
е) Об устройстве двигателя каждый водитель автомобиля;
1) должен обладать полной информацией;
2) может иметь неполную информацию.
Сколько байтов в следующем сообщении (кодировка АSCII)?
Сегодня очень холодно…
Читайте также
1)Задан массив из 11 целых чисел. Найти сумму элементов массива, кратных 5 2)Задан массив из 11 целых чисел. Посчитать количество нечётных
элементов массива.
3)задан массив из 9 целых чисел.Вывести на экран чётные элементы
Паскаль
Создать массив a из десяти целых чисел, принадлежащих промежутку [0;25). Вывести полученный массив на экран. Подсчитать k - количество элементов массива, значение которых превышает 12.
Помогите пожалуйста!! Очень нужно!!
Вы находитесь на странице вопроса "Задан список из десяти", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.