сервис вопросов и ответовPASCAL.
10-11 класс|
|
Дана строка, среди которой есть символы / \ | . Посчитать их количество(по отдельности).
Epishinakashiri
19 апр. 2015 г., 5:36:07 (9 лет назад)
Drunkard
19 апр. 2015 г., 6:49:49 (9 лет назад)
var s:string;
i,c1,c2,c3:integer;
begin
readln(s);
for i:=1 to length(s) do
if s[i]='/' then c1+=1
else if s[i]='\' then c2+=1
else if s[i]='|' then c3+=1;
writeln('/ = ',c1,' \ = ',c2,' | = ',c3);
end.
Ответить
Другие вопросы из категории
всем привет, что это за ошибка кто нить сталкивался с этим Ïîäêëþ÷åíèå íå óñòàíîâëåíî, ò.ê. êîíå÷íûé êîìïüþòåð îòâåðã çàïðîñ íà ïîäêëþ÷åíèå. вот если
да напишите что за ошибка и как её устранить!
Документ объёмом 8 Мбайт можно передать с одного компьютера на другой
двумя способами:
А) сжать архиватором, передать архив по каналу связи, распаковать;
Б) передать по каналу связи без использования архиватора.
Какой способ быстрее и на сколько, если:
• скорость передачи данных по каналу связи составляет 221 бит/с;
• объём сжатого архиватором документа равен 50 % от исходного;
• время, требуемое на сжатие документа, – 10 секунд, на распаковку –
3 секунды?
В ответе напишите букву А, если быстрее способ А, или Б, если быстрее
способ Б. Сразу после буквы напишите число, обозначающее, на сколько
секунд один способ быстрее другого.
Так, например, если способ Б быстрее способа А на 23 секунды, в ответе
нужно написать Б23.
Единицы измерения «секунд», «сек.», «с» к ответу добавлять не нужно.
1. Дан массив. Напечатать:
а) Все четные элементы
б) Все элементы, оканчивающиеся нулем.
2. В массиве хранится информация о количестве осадков, выпавших каждый день января. Определить, в какие числа месяца осадков не было.
Читайте также
Напишите на языках Pascal и C++ программу, которая генерирует 2 случайных вещественных числа и вычисляет их сумму, разность, произведение и
частное. Напишите на языках Pascal и C++ программу, моделирующую выбор одной из костей домино ( в наборе 28 костей домино, каждая состоит из двух половин, на каждой половине – от 0 до 6 очков). С помощью этой программы ответьте на вопрос: какова вероятность того, что выпадет кость с числом очков, кратным 3
В языке Pascal есть функция Pandom (a), которая служит для получения случайного ряда чисел из интервала (0;а). Вопрос: придумать, как можно при помощи
формул языка Pascal сделать так, чтобы случайные числа выпадали в интервале (a;b)
Скажите по конкретнее, что нужно знать чтобы научиться программировать в Pascal - что именно нужно изучить...
У нас на первом курсе тема Pascal, а я гляжу на него как баран на новые ворота...
Я отстал сильно на 2 недели и ни могу ни как понять его... Скажите пожалуйста по конкретнее с чего начать, что именно нужно изучить или выучить, понять, чтобы знать как составлять на нём программы ?
ЗАДАЧА ДЛЯ PASCAL ABC: В группе 30 учеников. За выполненный тест они могут
получить от 5 до 15 баллов (Сгенерить случайные числа
Помогите, пожалуйста, решить задачу:
Дан вектор из 25 элементов. Найти минимальное значение. Записать на языке Pascal и построить алгоритм.
Вы находитесь на странице вопроса "PASCAL.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.