С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/3: Рейтинг темы: голосов - 3, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 22.06.2009
Сообщений: 7
1

Обработка строк

22.06.2009, 17:14. Показов 622. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Разработать программу, которая из строки, представляющей собой восьмеричную запись числа, получает число в десятичной системе счисления и проверяет, кратно ли это число 5.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
22.06.2009, 17:14
Ответы с готовыми решениями:

Обработка строк
Вариант №33: Определить и вывести в алфавитном порядке символы с которых начинаются слова...

Обработка строк
Дана строка. Словом текста считается любая последовательность букв русского алфавита; между...

Обработка строк
Всем привет. Помогите плз решить данную задачу. Задача: Рассматривается непустая строка,...

Обработка строк
Ввести фамилию, имя и отчество в одну строковую переменную. Определить длину строки. 1.Вывести...

3
1250 / 408 / 52
Регистрация: 14.06.2009
Сообщений: 629
22.06.2009, 22:21 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var s:string[5];
ch,i,b,mn,code:integer;
begin
clrscr;
ch:=0;
mn:=1;
write('Vvedite stroku: ');
readln(s);
for i:=length(s) downto 1 do
 begin
 val(copy(s,i,1),b,code);
 ch:=ch+b*mn;
 mn:=mn*8;
 end;
if ch/5=(ch div 5) then writeln('Chislo: ',ch,' kratno 5')
                   else writeln('Chislo: ',ch,' ne kratno 5');
readln;
end.
1
3067 / 727 / 69
Регистрация: 24.09.2008
Сообщений: 1,531
23.06.2009, 02:59 3
Я конечно всё понимаю программа написана, но вот эта часть просто удивляет:
Pascal
1
if ch/5=(ch div 5) then
А нельзя ли написать вот так?
Pascal
1
if ch mod 5=0 then
Ведь намного проще, да и ПК не надо два раза делить...
1
1250 / 408 / 52
Регистрация: 14.06.2009
Сообщений: 629
23.06.2009, 20:45 4
Согласен, ваш способ лучше.
Про mod я не вспомнил (((
0
23.06.2009, 20:45
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
23.06.2009, 20:45
Помогаю со студенческими работами здесь

Обработка строк|
Рассматривается непустая строка содержащая не более 80 символов(вводить не через рандом) Каждый...

Обработка строк
Всем привет! Помогите с такой задачей: Определить количество слов, в которых все имеющиеся в них...

Обработка строк
пожалуиста,помогите решить задачу по паскалю :"5.1. 1. Составить программу, которая заставляет...

обработка строк
Дана строка, состоящая из латинских слов, разделенных пробелами. Определить количество слов в...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Книги и учебные ресурсы по C#
InfoMaster 08.01.2025
Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .
Что такое NullReferenceEx­­­ception и как исправить?
InfoMaster 08.01.2025
NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
Использование GraphQL в Go (Golang)
InfoMaster 08.01.2025
Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор?
Alexander-7 08.01.2025
Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .
Как работать с GraphQL на TypeScript
InfoMaster 08.01.2025
Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .
Счётчик на базе сумматоров + регистров и генератора сигналов согласования.
Hrethgir 07.01.2025
Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru