Найти значение получившееся переменной n в результате выполнения - Pascal

  1. Дали в шараге задачу, не могу сам решить, посоветовали в паскаль онлайн напечатать это, мол ответ даст, ошибки лезу, пожалуйста дайте значение или скажите что не так...))) Очень прошу.. //fpc 3.0.0 a := "decomposition"; n := 0; Делать от i = 1 до LEN(a) { b := Часть(a, i, 1); k := 0; Делать от j := i + 1 до LEN(a) { Если Часть(a, j, 1) = b то { k :=1; } } n := n + k; }

textual

Код:

var a:string;
     b:char; 
    n,i,j,k:byte;
begin
a:='decomposition';
n:=0;
for i:=1 to length(a) do
 begin
  b:=a[i];
  k:=0;
  for j:=i+1 to length(a) do
  if a[j]=b then k:=k+1;
  n:=n+k;
 end;
write('n=',n);
end.

Похожие ответы
  1. следующие функции: −построение в связной памяти бинарного поискового дерева по дан- ным из файла на основе операции поиска вставкой; −поиск вершин, у которых количество потомков в левом поддереве от- личается от количества потомков в правом поддереве на единицу, на основе ре- курсивного алгоритма восходящего обхода; −нахождение высоты дерева на основе итеративного алгоритма нисходящего обхода; −поиск k-гов порядке слева направо листа дерева(k задается пользова- телем) на основе рекурсивного алгоритма смешанного обхода; −удаление вершины по ключу, заданному пользователем, на основе операции поиска исключением.

  1. Указатель - это переменная, которая в хранит качестве своего значения адрес байта памяти. Что значит адрес байта памяти? К примеру s:^integer - переменная s указатель, который в качестве своего значения хранит адрес памяти типа Integer?Добавлено через 7 минут В общем как правильно сказать) Может "хранит в качестве своего значения адрес памяти типа integer размером 4 байт?

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

  1. Здравствуйте,помогите пожалуйста написать код.В городе Новые Васюки на некоторых дорогах введено одностороннее движение. Схема дорог задана в виде весовой матрицы графа, числа обозначают длины дорог. Если длины дорог из пункта А в пункт Б разные, это означает, что есть две разные дороги. Найдите отдельно количество дорог в Новых Васюках с односторонним и двусторонним движением. Входные данные В первой строке вводится количество перекрёстков в Новых Васюках N ( 1 ≤ N ≤ 1000 ). В следующих N строках записано по N чисел, разделённых пробелами – длины дорог между каждой парой перекрёстков. Ноль означает, что дороги между этими перекрёстками нет. Выходные данные Программа должна вывести два числа в одной строке, разделив их пробелом: сначала количество дорог с односторонним движением, потом – количество дорог с двусторонним движением. Примеры входные данные 5 0 2 3 4 0 2 0 5 0 7 3 6 0 8 0 0 0 0 0 0 0 7 0 9 0 выходные данные 5 3

  1. Решить задачу с помощью процедур и функций. Написать программу подсчета числа четных цифр, используемых в записи N-значного числа M.

  1. Ввести строку, в которую могут входить только цифры и буквы. Подсчитать ко- личество и вывести на экран цифры.

  1. Написать программу для решения следующей задачи,используя,по крайней мере, два вида циклов. Найти натуральное наименьшее число n, факториал которого превышает число 4000 (n!>4000).

  1. Доброе утро, день или вечер! Помогите составить программу на паскале для решения вот такой вот системы: y=-3x+9, при х<=7 1/(x-7), при х>7 Спасибо.

  1. 1. Дана вещественная матрица D размером 7х9( можно изменить). Упорядочить строки матрицы по возрастанию, используя метод попарно – обменной сортировки.


Нашли ошибку?
Развитие проекта
Яндекс.Метрика