Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 06.12.2022
Сообщений: 2

Найти стоимость телеграммы

06.12.2022, 19:22. Показов 362. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Строковая величина - телеграмма. Стоимость одного слова в ней 1530 руб. Найти стоимость телеграммы
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
06.12.2022, 19:22
Ответы с готовыми решениями:

Стоимость телеграммы
Нужно составить программу, определяющую стоимость телеграммы по количеству слов в ней, стоимость слова - 50 коп.. Так же есть...

Подсчитать стоимость телеграммы, текст которой вводится с клавиатуры
написать программу,подсчитывающую стоимость телеграммы,текст которой вводится с клавиатуры.

Нужно составить программу, определяющую стоимость телеграммы по количеству слов в ней
Нужно составить программу, определяющую стоимость телеграммы по количеству слов в ней, стоимость символа - 1 руб. ПРОБЕЛЫ НЕ УЧИТЫВАЮТСЯ!

3
Модератор
10451 / 5741 / 3409
Регистрация: 17.08.2012
Сообщений: 17,472
06.12.2022, 21:13
Лучший ответ Сообщение было отмечено desaw как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const
  w = 1530;
var
  s: string;
  i, k: integer;
begin
  writeln('Введите телеграмму (одной строкой): ');
  readln(s);
  s := s + ' ';
  k := 0;
  for i := 1 to length(s) - 1 do
    if (s[i] <> ' ') and (s[i+1] = ' ') then inc(k);
  k := k * w;
  writeln('Стоимость телеграммы: ', k, ' рублей');
  readln
end.
1
 Аватар для AHBAR
1077 / 488 / 316
Регистрация: 05.04.2013
Сообщений: 2,141
07.12.2022, 13:36
Я как связист не могу не вставить свои три копейки для общего развития: на самом деле стоимость телеграммы не совсем так рассчитывается. Кроме самого текста телеграммы еще и приплюсовываются другие слова, например адрес. Еще в зависимости от тарифа, например срочная телеграмма, тоже добавится к стоимости. А слова через дефис будут считаться как 2 слова, например, Петропавловск-Камчатский. Но конечно же ни преподавателю, ни обучаемому это не нужно. Просто в реальной жизни, когда начинающий программист будет работать разработчиком, ему нужно будет учитывать все нюансы
1
Модератор
10451 / 5741 / 3409
Регистрация: 17.08.2012
Сообщений: 17,472
07.12.2022, 17:13
AHBAR, ну что тут поделаешь... Задание приближённо-потолочное.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
07.12.2022, 17:13
Помогаю со студенческими работами здесь

Ввести текст телеграммы и стоимость одного слова. Определить стоимость телеграммы
Ввести текст телеграммы и стоимость одного слова. Опред. стоимость телеграммы. При вводе текста запятые обозначаются словом ЗПТ, точки -...

Подсчитать стоимость телеграммы, текст которой вводится с клавиатуры
1. 1) Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1...

Цикл repeat. Стоимость акций известной фирмы стабильно растёт на протяжении 6 месяцев. Найти стоимость акций
Пожалуйста решите с циклом repeat. Стоимость акций известной фирмы стабильно растёт на протяжении 6 месяцев, каждый месяц на 0,6%....

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

Рассчитать стоимость телеграммы
Вводится строка содержащая текст телеграммы (с консоли или из файла). Слова состоят из букв (только латинские или только русские)...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
К слову об оптимизации
kumehtar 01.04.2026
Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru