Главная страница Случайная страница
Разделы сайта
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника
-
Как продвинуть сайт на первые места?Вы создали или только планируете создать свой сайт, но не знаете, как продвигать? Продвижение сайта – это не просто процесс, а целый комплекс мероприятий, направленных на увеличение его посещаемости и повышение его позиций в поисковых системах.Ускорение продвиженияЕсли вам трудно попасть на первые места в поиске самостоятельно, попробуйте технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Если ни один запрос у вас не продвинется в Топ10 за месяц, то в SeoHammer за бустер вернут деньги. Начать продвижение сайта
-
-
Сервис онлайн-записи на собственном Telegram-ботеТот, кто работает в сфере услуг, знает — без ведения записи клиентов никуда. Мало того, что нужно видеть свое расписание, но и напоминать клиентам о визитах тоже. Нашли самый бюджетный и оптимальный вариант: сервис VisitTime.
Для новых пользователей первый месяц бесплатно. Чат-бот для мастеров и специалистов, который упрощает ведение записей: — Сам записывает клиентов и напоминает им о визите;
— Персонализирует скидки, чаевые, кэшбэк и предоплаты;
— Увеличивает доходимость и помогает больше зарабатывать; Начать пользоваться сервисом
Массивы.
|
|
Объявление переменной массива происходит в разделе var. При этом используется зарезервированное слово array, указывается тип массива и его размерность перечислением индексов, а также объявляется тип данных в массиве.
Пример 1:
Пример 2:
var masiv: array ['a'..'z'] of integer;
Для обращения к элементу массива в Pascal-программе указывается имя массива и в квадратных скобках индексы элемента.
Пример 1:
a [2, 4]
а) ввести значение:
read (A[2, 4]);
б) изменить значение:
A[2, 4]: =5;
в) сообщить значение:
write (A[2, 4]);
Пример 2:
masiv ['b'];
masiv['b']: =47*24;
Задача ввода элементов массива.
а) линейного:
program vvod;
var A: array [1..10] of integer;
i: integer;
begin
for i: =1 to 10 do
read (A[i]);
end.
б) двумерного:
program vvod;
const n=5; m=7;
var A: array [1..n, 1..m] of real;
i, j: integer;
begin
for i: =1 to n do
for j: =1 to m do
read (A[i, j]);
end.
Задача 2: найти минимальный элемент в массиве:
program min;
const n=10;
var i: byte;
a: array [1..n] of real;
min: real;
begin
for i: =1 to n do read (A[i]);
min: =A[1];
for i: =1 to n do
if min> A[i] then min: =A[i];
write (min);
end.
|
|