Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
0 / 0 / 0
Регистрация: 03.11.2019
Сообщений: 21

Возьмите случайное количество чисел в строке из файла, посчитайте их сумму и выведите на экран

04.11.2019, 19:24. Показов 1706. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
напишите пожалуйста программу в стиле "классического паскаля"
начиная с var
f:text и т.д.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
04.11.2019, 19:24
Ответы с готовыми решениями:

Выведите содержимое файла на экран и посчитайте количество символов
Создать текстовый файл в который запишите и цифры. Выведите его содержимое на экран, посчитайте количество символов и выведите их также на...

Выведите на экран позиции, на которых в строке находится буква 'е'. Посчитайте их количество
Помогите решить задачку Условие: Выведите на экран позиции , на которых находится буква 'е'. Посчитайте их количество.

Выведите содержимое очереди на экран и посчитайте количество элементов образованной очереди
Дан текстовый файл. Проанализировав в программе содержимое файла, выберите из него имена и занесите в очередь. Выведите содержимое очереди...

6
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
04.11.2019, 23:28
"классический паскаль" это стиль, который устарел лет так 20 назад. Его ещё изучают в школах, но это только потому что общественное образование не может успевать за развитием технологий.

Научиться новому стилю проще и быстрее, потому что весь смысл в нём - быть максимально интуитивным. И если сможете объяснить учителю что делает программа - он не придётся. Я сам не так уж давно учился в шкалке, так что знаю о чём говорю.

В данном разделе полно людей которые с радостью в этом помогут. Ну а если всё же так уж хотите деградировать - пишите в разделы старых паскалей.
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
05.11.2019, 05:50

Не по теме:

Кликните здесь для просмотра всего текста
Sun Serega, человек попросил явно, чего он хочет, если у Вас нет желания ему помогать, то какой смысл Вашего сообщения? Другое вопрос в том, что, раздел в подобной ситуации лучше выбирать другой, но, только, в том случае, если это не помешает работоспособности программы на PascalABC.NET (если требуется запускать программы на нем).



barabara, Puporev Вам может помочь.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33395 / 21505 / 8236
Регистрация: 22.10.2011
Сообщений: 36,901
Записей в блоге: 12
05.11.2019, 09:51
Цитата Сообщение от Sun Serega Посмотреть сообщение
"классический паскаль" это стиль, который устарел лет так 20 назад
Нет. Это стиль, который будет одинаково хорошо компилироваться как PABC.NET, так и FPC, и Delphi, а не тот птичий язык, который прибит гвоздями к одной ОС и к одному фреймворку, на котором в последнее время пишутся все программы в этом разделе..
1
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
05.11.2019, 10:31
Цитата Сообщение от volvo Посмотреть сообщение
одинаково хорошо компилироваться
И не более того. Даже запускаться он одинаково хорошо не будет, взять хотя бы строки в связных списках из записей. Уже ни раз писал почему это нельзя делать в .Net .

И я уже не говорю про оптимизацию. Даже у Linq с ней дела лучше.

Универсальность когда она в ущерб всему остальному - помогает только развивать плохие виды лени.
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
05.11.2019, 11:02
Цитата Сообщение от Sun Serega Посмотреть сообщение
И не более того.

Не по теме:

Писать программы в стиле классического Pascal позволяет устремить своё внимание больше на алгоритм работы программы, нежели использование специфических для .NET вещей (хотя, никто не спорит, что знать их небесполезно). Развитие алгоритмического мышления немаловажное умение для программиста.



Цитата Сообщение от Sun Serega Посмотреть сообщение
И я уже не говорю про оптимизацию.

Не по теме:

То, что некоторые вещи реализованы в конкретном компиляторе не так как хотелось - не мечта программиста, но это не значит, что их использовать нельзя. Можно, но всегда стоит помнить, что возможная оптимизация может повлечь привязку к конкретному компилятору.



Цитата Сообщение от Sun Serega Посмотреть сообщение
Универсальность когда она в ущерб всему остальному - помогает только развивать плохие виды лени.

Не по теме:

Не согласен. В данном случае Вы обобщаете, сгущая краски (употребляя слово "всему"), к этому случаю это неприменимо.

0
Модератор
10430 / 5718 / 3404
Регистрация: 17.08.2012
Сообщений: 17,389
05.11.2019, 14:06
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Ох, нет... Я хотел удалить несуразный пост #2, но, пока писал в личку, тут уже целая дискуссия образовалась... Вот то, что я написал в личку:
Здравствуйте.

Sun Serega, в теме Возьмите случайное количество чисел в строке из файла, посчитайте их сумму и выведите на экран Вы, сдаётся мне, не подумавши, чушь написали:
Цитата Сообщение от Sun Serega Посмотреть сообщение
"классический паскаль" это стиль, который устарел лет так 20 назад. Его ещё изучают в школах, но это только потому что общественное образование не может успевать за развитием технологий.
Научиться новому стилю проще и быстрее, потому что весь смысл в нём - быть максимально интуитивным. И если сможете объяснить учителю что делает программа - он не придётся. Я сам не так уж давно учился в шкалке, так что знаю о чём говорю.
В данном разделе полно людей которые с радостью в этом помогут. Ну а если всё же так уж хотите деградировать - пишите в разделы старых паскалей.
Возможно, Вы желали написать нечто умное и полезное. Со мной тоже такое бывало: напишешь что-то умное и полезное, а получается что-то глупое и злое. Сами смотрите:
Цитата Сообщение от Sun Serega Посмотреть сообщение
"классический паскаль" это стиль, который устарел лет так 20 назад
А ничего, что Delphi и FPC + Lazarus прямо сейчас живут и процветают? В них как раз и используется ..."классический паскаль" это стиль, который устарел лет так 20 назад... А Pascal ABC.NET вообще уже сдох. Что, я не прав? Ну так напишите об одном из многочисленных глюков PABC.NET в их группу поддержки, и... Никто и ничего не исправит. Даже создатели уже забыли об своём произведении. Зачем поддерживать труп, если это тупо экономически невыгодно? И, главное, зачем писать программы на бесплатно-глючном и нестабильном переводе C# на паскаль, если можно писать программы непосредственно на C#? Опять я не прав? Ну тогда назовите хоть один коммерческий продукт на Pascal ABC.NET.
Цитата Сообщение от Sun Serega Посмотреть сообщение
Научиться новому стилю проще и быстрее
Правда, что ль? То есть, Вы утверждаете, что освоить паскаль, а также методы работы с последовательностями, лямбда-выражения и прочие .NETовские прибамбасы - это проще и быстрее, чем освоить только паскаль? Не видите некоторой нелогичности? Эти самые .NETовские прибамбасы, как Вы пишете, максимально интуитивны? Да Вы что? Может быть, Вы - гений? Мне, например, каждый раз приходится секунд десять думать, что же делает то или иное лямбда-выражение. Ну, это и понятно: мне, плебею, никогда не освоить тех высот науки, которые изучают в шкалках.
Цитата Сообщение от Sun Serega Посмотреть сообщение
быть максимально интуитивным
(Beavis & But-head voices): Гхех-гхех... Ага-ага... Точно-точно... (end Beavis & But-head voices). Скажите, Вы и вправду не подозреваете, для которого IQ создаются "максимально интуитивное"? Хорошо, открою Вам страшную тайну: "максимально интуитивное" создаётся в первую очередь для тупорылых недоумков, которые не могут и не хотят хоть что-то учить, потому что "многа букав". Это всё из-за денег: чем шире ранок, тем больше прибыль.
Цитата Сообщение от Sun Serega Посмотреть сообщение
если всё же так уж хотите деградировать
С учётом того, что я написал выше... Вам не стыдно?

И ещё. Внимательно прочитайте правила форума. Фактически, Вы нарушили пункт 3.1, тролль Вы наш ненаглядный. И ещё, из правил следует, что

"я ничего не желаю делать вообще, и ты всё сделаешь за меня, презренный untermensch" = "помощь"

Неожиданно, да? Но, по сути, это так и есть. И какой смысл лечить головы тем, кто по праву приходит сюда за халявой? Будьте проще, привыкайте. Мне особенно тяжело приходится во времена сезонных обострений, но я терплю, и... Выдаю халяву. Чего и Вам советую. Не всем нужно программирование, но все его проходят. И очень многие - мимо.

А ещё темы на киберфоруме не закрываются и не удаляются вообще никогда, естественно, если не противоречат правилам форума. В этом - главное отличие киберфорума от прочих форумов. Это малое отличие не такое уж и малое. Надеюсь, Вам удастся сделать выводы из этой уникальности. Получается, что Вы пишете ответ не для недоумка, который создал тему, а для всего мира. Правда, здорово?

Если желаете, можете оспорить мои утверждения, но только в личке. Тему я почистил. Если считаете, что Ваше сообщение - не сказанное сгоряча, напишите, и я, хоть и с тяжестью на душе, но восстановлю тему. Но, полагаю, этого не будет: я считаю Вас умным человеком, и, вообще-то, был удивлён этой Вашей эскападой. Так думаю, Вы в сердцах это написали.

И ещё. Поймите, этот форум - частная собственность, и mik-a-elю по-любому приходится балансировать между честью и чистоганом. Поверьте, ему это делать отнюдь нелегко. Но, что не сделаешь ради денег... Не осуждайте его. Что, осуждаете? Ну так сделайте свой киберфорум с Вашими правилами. Иные варианты неприемлемы.

Простите за грубость, но, повторюсь, Вы ценны для меня, как умный человек. Поэтому - я и написал вот так, прямо и грубо, незачем перед умным книксены делать.

Всего Вам доброго.
Хотел я всё это дело на тормозах спустить, а Вы тут накинулись на несчастного Sun Serega... Пришлось из-за Вас выложить приватную информацию на всеобщее обозрение.

Добавлено через 22 минуты

Не по теме:

Народ, в следующий раз постарайтесь сдержать эмоции и не отвечать сразу... Вдруг оно само рассосётся? И Вам честь за долготерпение, и человеку не стыдно.

4
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
05.11.2019, 14:06
Помогаю со студенческими работами здесь

Выведите массив на экран в обратном порядке по 6 чисел в строке
Массив состоит из 40 случайных двузначных чисел. Выведите их на экран в обратном порядке по 6 чисел в строке. Помогите плиз!!!!

Сгенерировать случайное трехзначное число и вывести на экран их сумму и произведение этих чисел
Сгенерировать случайное трехзначное число и вывести на экран их сумму и произведение этих чисел.

Выведите числа на экран в прямом и обратном порядке по 6 чисел в строке
Массив состоит из 18 случайных двузначных чисел. Выведите их на экран в прямом и обратном порядке по 6 чисел в строке.

Определите и выведите на экран сумму нечётных двузначных чисел
определите и выведите на экран сумму нечётных двузначных чисел. Попроще код.

Выведите на экран количество отрицательных и положительных чисел массива
Одномерные массивы. 12.Массив состоит из 20 целых положительных и отрицательных чисел. Выведите на экран количество отрицательных и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru