![]() |
|
Другие темы раздела | |
Pascal Выборы. Олимпиадная задача На выборах в Государственную думу в избирательные бюллетени внесено N партий. Электронный сканер для считывания информации с бюллетеней передает информацию о каждом бюллетене в следующем формате:... program zz; var n,m:integer; i,j,g,z,bilkol:integer; d1,d2:text; st:string; a:array of integer; begin assign(d1, 'input.txt'); assign(d2, 'output.txt'); reset(d1); |
Pascal Чему равна сумма элементов массива после выполнения этого фрагмента программы?
https://www.cyberforum.ru/ pascal/ thread523630.html Значения элементов двухмерного массива A задаются с помощью следующего фрагмента программы: for i:=1 to 100 do for k:=1 to 100 do if i > k then A := i else A := -k; Чему равна сумма... uses crt; i,k:integer; a:array of integer; begin for i:=1 to 100 do begin for k:=1 to 100 do if i>k then A:=i else a:=-k; writeln (-k); |
Pascal Рисование ломаной линии. Рисуется ломаная линия. Фиксирование первых и очередных узлов осуществляется нажатием клавиши ''Enter'',фиксирование последнего узла двойным нажатием клавиши ''Enter''. Для удаления всей ломаной... актуально! https://www.cyberforum.ru/ pascal/ thread525857.html |
Pascal Задан массив AX (N). Добавить массив С(К). Выполнить сортировку разделением. Найти элементы >5
https://www.cyberforum.ru/ pascal/ thread523749.html Задан массив AX (N). Добавить массив С(К). Выполнить сортировку разделением. В полученном массиве найти элементы >5 и создайте из них новый массив. Выведите на печать образованный массив и число его... |
Pascal Написать процедуру удаления из строки всех кратных символов
https://www.cyberforum.ru/ pascal/ thread523916.html Всем доброго времени суток. Давно просматриваю ваш форум по Паскалю, но вот только сейчас решил зарегистрироваться и прошу помощи в решении такой задачи: Дана строка символов. Написать процедуру... Var S:String; //Вводимая строка i:Integer; //Счетчик для цикла procedure Sim; // var ch: set of char; //Множество символов для определения четности Begin ... |
Pascal В каждом столбце матрици переставаить эл-ты так чтобы вначале вместе шла группа эл-тов больше первого эл-та столбца... помогите пожалуйста написать программу в паскале дана действительная матрица А размером n*m n,m<10 В каждом столбце матрици переставаить эл-ты так чтобы вначале вместе шла группа эл-тов больше... const nmax=9; type realMatrix=array of real; var a:realMatrix; i,j,g,k,n,m:integer; tmp:real; begin randomize; https://www.cyberforum.ru/ pascal/ thread526773.html |
Текст. файл содержит руские буквы. Опредилить сколько раз в тексте встречаеться цифра 7. Pascal Дан текст фаил содержит русские буквы определить сколько раз в тексте встречается цифра 7. Надо создать текстовый документ в нем написать какой то текст и любые цифры. И надо чтобы паскаль в этом... uses CRT; const MyFile='d:\MyText.txt'; //Путь к файлу Var F:Text; S:String; i:Integer; chislo:Integer; //Поиск числа begin clrScr; ... |
Найдите точки пересечения графиков функций Pascal Доброго времени. Есть задача, вроде не сложная, но не получается сделать. Прога ничего не выводит, а где ошибка не могу разобраться. Буду очень признателен оказанной помощи. P.S. может я вообще ее... Это всё из-за странного округления в паскале, вот программа с поправкой: Program CrossPoint; uses CRT; var g,y,x,e:real; begin ClrScr; x:=-50; e:=0.1; while x<=50 do begin |
Pascal Сортировка двумерных массивов.
https://www.cyberforum.ru/ pascal/ thread525535.html 1. В двумерном числовом массиве Y отсортировать элементы предложенной N-строки. 2. В двумерном числовом массиве Z найти 3 наибольших элемента и выделить их цветом. Прошу наиболее простыми... 1. Program n1; Uses crt; Const m=8;k=5; Var a:arrayof integer; v,i,j,n:integer; f:boolean; Begin clrscr; randomize; |
Pascal Вычислить функцию Z=(X(I)^2)/(Sin(X(I)/2)) где X(I) элемент массива X(18) Пока только начинаю учить паскаль . В чем ошибка у меня? var X:array of integer; I:=integer; Begin for I:= 1 To 18 DO Begin X:= Trunc(Random*100)-50; END; Begin Подправил: и что нормально? const n = 18; var Arr: array of Integer; i: Byte; begin Randomize; writeln('Массив: '); |
Pascal Задача с роликами
https://www.cyberforum.ru/ pascal/ thread525517.html Фирма NNN решила транслировать свой рекламный ролик в супермаркете XXX. Однако денег, запланированных на рекламную кампанию, хватило лишь на две трансляции ролика в течение одного рабочего дня. ... |
Pascal Сортировка двумерных массивов
https://www.cyberforum.ru/ pascal/ thread525717.html 1. в одномерном числовом массиве x отсортировать элементы, находящиеся между максимальным по значению элементом и минимальным 2.в двумерном числовом массиве Y отсортировать элементы предложенного... 1) uses crt; var i,j,k,min,max,tmp: integer; x: array of integer; begin clrscr; min:=1; max:=1; for i:=1 to 20 do begin |
Нiколай
|
|
0 | |
Разработать программу, которая в заданной строке подсчитывает количество букв в каждом слове - Pascal - Ответ 283415325.03.2012, 16:20. Показов 2499. Ответов 1
Метки (Все метки)
Помогите пожалуйсто решить задачку. Самому ни как не справится..
Разработать программу, которая в заданной строке подсчитывает количество букв в каждом слове. Слова разделены пробелами (одним или несколькими). Вернуться к обсуждению: Разработать программу, которая в заданной строке подсчитывает количество букв в каждом слове Pascal |
25.03.2012, 16:20 | |
Готовые ответы и решения:
1
Разработать программу, которая в подсчитывает количество букв в каждом слове
Разработать программу, которая в заданной строке подсчитывает, сколько раз повторяется каждый символ |
25.03.2012, 16:20 | |
Помогаю со студенческими работами здесь
0
Разработать программу, которая для заданной строки подсчитывает количество содержащихся в ней цифр
|
Новые блоги и статьи
![]() |
||||
Что такое шаблоны Django и как с ними работать
stackOverflow 19.02.2025
Шаблоны Django - основополагающий компонент фреймворка Django, который позволяет эффективно разделять логику приложения и его визуальное представление. Это очень важный инструмент для. . .
|
Какой Python Web-фреймворк лучший: Django, Flask или FastAPI?
stackOverflow 19.02.2025
В разработке под веб Python занимает особое место благодаря своей универсальности и богатой экосистеме. При создании веб-приложений разработчики сталкиваются с важным выбором - какой фреймворк. . .
|
Использование кэша Laravel - полный гайд
bytestream 18.02.2025
Кэширование - один из наиболее эффективных способов повышения производительности веб-приложений. В современном мире, где скорость загрузки страниц напрямую влияет на удержание пользователей и. . .
|
Создаем REST API в Laravel с аутентификацией и Passport
bytestream 18.02.2025
Разработка современных веб-приложений все чаще требует создания надежного и хорошо структурированного API. REST API стал стандартом де-факто для построения взаимодействия между клиентской и серверной. . .
|
Пайплайны в Laravel - полный гайд
bytestream 18.02.2025
Разработка современных веб-приложений часто требует обработки сложных процессов, состоящих из множества последовательных шагов. Например, при создании системы комментариев может потребоваться. . .
|
Как правильно использовать @required в Symfony
bytestream 18.02.2025
При разработке приложений на Symfony мы часто сталкиваемся с необходимостью внедрения зависимостей. Фреймворк предоставляет несколько способов управления этим процессом, и одним из таких инструментов. . .
|
Система безопасности в Laravel: возможности и примеры
Wired 18.02.2025
Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
|
Давайте сравним Django и Laravel
Wired 18.02.2025
Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .
|
Laravel или React - что лучше?
Wired 18.02.2025
В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .
|
Laravel 11: новые возможности, гайд по обновлению
Wired 18.02.2025
Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .
|