💸 Как сделать бизнес проще, а карман толще?

Тот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое раписание, но и напоминать клиентам о визитах тоже. Проблема в том, что средняя цена по рынку за такой сервис — 800 руб/мес или почти 15 000 руб за год. И это минимальный функционал. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
⚡️ Для новых пользователей первый месяц бесплатно. А далее 290 руб/мес, это в 3 раза дешевле аналогов. За эту цену доступен весь функционал: напоминание о визитах, чаевые, предоплаты, общение с клиентами, переносы записей и так далее.
✅ Уйма гибких настроек, которые помогут вам зарабатывать больше и забыть про чувство «что-то мне нужно было сделать».
Сомневаетесь? нажмите на текст, запустите чат-бота и убедитесь во всем сами!

Заполнение одномерных массивов.

Рассмотрим присвоение значений элементам одномерного массива из 10 элементов (тип элементов в данном случае значения не имеет).

1) Заполнение с клавиатуры.

for i: =1 to 10 do begin

writeln(‘введите значение элемента’);

readln(a[i])

end;

2) Заполнение случайными числами. Для этого используется функцию RANDOM, которая генерирует случайные числа.

for i: =1 to 10 do

a[i]: =random(n); {n должно быть заранее задано}

3) Заполнение по формуле. Например, каждый элемент массива должен быть рассчитан по формуле а[i]= sin(i)-cos(i)

for i: =1 to 10 do

a[i]: =sin(i)-cos(i)

Примеры заполнения двумерного массив, содержащего 8 строк и 12 столбцов случайными числами:

1) построчно (индекс строк меняется медленнее, чем индекс столбца), значения элементов массива – целые числа от 60 до 160.

for i: =1 to 8 do

for j: =1 to 12 do

a[i, j]: =random(100)+60;

2) по столбцам (индекс столбца меняется медленнее, чем индекс строки), значения элементов массива действительные числа от 0 до 30.

for j: =1 to 12 do

for i: =1 to 8 do

a[i, j]: =random*30;

Нахождение суммы и произведения

Вычислить

J