1. Информатика
  2. Составить программу вычислить

Составить программу вычислить сумму порядковых номеров всех букв , входящих в слово sum. )

Qweres2000 Qweres2000    2   10.08.2019 02:50    16

Ответы
inkarmukash inkarmukash  04.10.2020 08:28
Var
    i, s: integer;
    str: string;

begin
    str := 'SUM';
    for i := 1 to Length(str) do
        s := s + ord(str[i]);
    writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
FannyPanda FannyPanda  14.09.2019 19:10
Некоторый алгоритм из одной цепочки символов получает новую цепочку следующим образом. сначала записывается исходная цепочка символов, после нее записывается буква, которая...
Айзат121а Айзат121а  14.09.2019 19:10
Вкачестве носителей информации нельзя использовать: а)цифровой фотоаппарат. б)радиотелефон. в)мрз-плеер. г)электронную книгу....
настюшка1101 настюшка1101  14.09.2019 18:07
Какими весами можно помереть вес машины? как они называются?...
mrgrabik mrgrabik  14.09.2019 19:10
Pascal abc. .напишите программу, которая в последовательности натуральных чисел определяет максимальное число, кратное 4. программа получает на вход количество чисел в...
NatyGranilace NatyGranilace  14.12.2021 13:33
ЗАДАЧА За сколько секунд можно передать по каналу связи текст объемом 1800 байтов,если скорость передачи данных равна 14400 бит/с? Дано: Найти: Решение: ответ:...
prkf prkf  14.12.2021 13:34
Ксанка встановила на своєму новому смартфонi пароль − чотиризначний пiн-код, за до якого смартфон можна розблокувати. Наступного дня, як завжди це буває, Оксанка пiн-код...
kirllakylov kirllakylov  14.12.2021 13:35
Дан одномерный массив. Сформировать его в промежутке до 50. Вывести на экран количество нечётных элементов массива, больших 40...
MartKsenka MartKsenka  14.12.2021 13:35
1) Вычислить значение суммы N членов следующего ряда: 14+k/2+k/4+k/6…. N 0,K 0 вводятся с клавиатуры. 2) Найти все числа натурального ряда, не превосходящие N 0 и кратные...
Егор111ив Егор111ив  14.12.2021 13:36
Заполни сравнительную таблицу растрового и векторного изображения: Растровое изображение Векторное изображение Программы для работы Достоинство Недостаток 3. Найди соответствие:...
TanushaGuda TanushaGuda  14.12.2021 13:36
1. Рассмотрите представленные рисунки и определите вид графики :) 1) ILOTCUTE на nеимүшество растровой и векторной графики:...

Популярные вопросы