Стандартная обработка одномерных массивов на языке Pascal

Начиная работу с одномерными массивами на языке Pascal каждый школьник должен понимать с чего начинать написание алгоритма программы. Итак, программа начинается всегда со слова program, за которым через пробел следует имя программы. Имя должно состоять из латинских букв или цифр, общее количество которых должно быть не более 8. Обратите, пожалуйста, внимание что символ «;» завершает почти каждую строку программы.Совершая пропук этого важнейшего символа - одна из самых распространненых ошибок юны...
Раздел Информатика
Класс -
Тип Конспекты
Автор
Дата
Формат docx
Изображения Нет
For-Teacher.ru - все для учителя
Поделитесь с коллегами:

Начиная работу с одномерными массивами на языке Pascal каждый школьник должен понимать с чего начинать написание алгоритма программы. Итак, программа начинается всегда со слова program, за которым через пробел следует имя программы. Имя должно состоять из латинских букв или цифр, общее количество которых должно быть не более 8. Обратите, пожалуйста, внимание что символ ";" завершает почти каждую строку программы.
Совершая пропук этого важнейшего символа - одна из самых распространненых ошибок юных программистов.
Одномерный массив может выводиться как в строку так и в столбец.
Для написания такой программы первым делом нужно ввести значение A[1] - перый элемент массива А (первое число, которое введет ученик с клавиатуры), далее значение A[2]- второй элемент массива A и тд. Вывод на экран текста "Исходный массив" нужна для того, чтобы человек, который будет запускать программу знал, за чила были вами введены.
Вывод осуществляется через команду writeln.
Простейшие алгоритмы на одномерном массиве, которые наиболее часто употребляются в работе Pascal: 1) подсчет элементов, обладающих заданным свойством, 2) поиск максимального и минимального элементов, 3) поиск элементов, обладающих заданным свойством.
Пример простейшей программы Pascal с одномерным массивом, можете использовав листинг программы.
Листинг 1
program Sum;

var
a:array [1..10] of integer;
i,s : integer;
begin
writeln ('Введите 10 чисел');
for i:=1 to 10 do readln(a[i]);
s:=0;
for i:=1 to 10 do s:=s+a[i];
writeln('Исходный массив');
for i:=1 to 10 do write(a[i], ' ');
writeln;
writeln('ответ');
writeln(s);
readln;
end.

© 2010-2022