Дана программа на языке программирования pascal какой массив выведет программа последней строкой

Содержание

Перед началом работы с массивом в программе нужно объявить массив в разделе описания переменных. Раздел описания переменных начинается с var. Присваиваем массиву имя, далее пишем служебное слово array, которое обозначает «массив», после в квадратных скобках указываем константы, определяющие диапазон индексов массива, дальше of — служебное слово «с», указываем тип элементов массива.

<имя массива>: array [ .. ] of ;.
Запись массива на языке программирования Pascal:
var M: array [(1)..(10)] of integer;

В объявленном массиве может быть (10) элементом с соответствующими порядковыми номерами от (1) до (10).

Напишем программу, которая будет считывать отдельно каждый элемент массива, вводимый с клавиатуры, и запоминать его. А после этого выведет весь массив на экран.

Для ввода значений с клавиатуры будем использовать оператор read и счётчик — цикл for.
Для вывода массива воспользуемся оператором write и циклом for.

Скриншот.jpg

Программирование на языке Pascal. Урок 7. Массивы.

Значения в массиве можно расставить случайным образом. Для генерации чисел от (0) до (N) используется запись random ((N)). Перед использованием функции необходимо инициализировать датчик случайных чисел с помощью процедуры randomize.

Источник: www.yaklass.ru

Решу Паскаль

Задача. Дано натуральное число N. Вывести его последнюю цифру.

Приведем 3 способа решения данной задачи:

с использованием операции mod;
с использованием строкового типа данных string;
с использованием функции digits из модуля School.

Способ 1 (с использованием операции mod)

Последняя цифра натурального числа показывает количество единиц в числе. Вычислим эту цифру делением на 10.

Способ 2 (с использованием строкового типа данных string)

var N,d:integer; str:string; c:char;

println(‘Введите натуральное число’);

str:=N.ToString; //преобразовать число N в строку str

c:=str[str.length]; //последний символ строки str

d:=c.ToDigit; //преобразовать символ в цифру

println(‘Последняя цифра числа’,d);

Способ 3 (с использованием функции digits из модуля School)

mas:array of integer;

println(‘Введите натуральное число’);

mas:=digits(N).toArray;//получение списка цифр и преобразование списка в массив

d:=mas[mas.Length-1];//последний элемент массива mas

println(‘Последняя цифра числа’,d);

Каким способом следует воспользоваться для решения следующей задачи:

Дано натуральное число. Вычислить сумму его цифр.

Источник: reshupascal.blogspot.com