Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Дана строка любых символов. Вывести на экран недостающие цифры дана строка любых символов вывести на экран недостающие цифры https://www.cyberforum.ru/ pascalabc/ thread1077060.html	Pascal ABC Нужен пример любой анимации, желательно с геометрическими фигурами нужна программа которая показывает анимацию, любую анимацию, желательно с геометрическими фигурами
Pascal ABC Протабулировать функцию https://www.cyberforum.ru/ pascalabc/ thread1076972.html	Pascal ABC Найти значение функции "у" заданной для целого числа "х" в диапазоне (-10..15) https://www.cyberforum.ru/ pascalabc/ thread1076965.html Заранее благодарочка)
Pascal ABC Найти сумму ряда Нужна ваша помощь. Найти сумму ряда \sum_{n=1}^\infty \frac{n}{5n^2+3} с точностью до ε, т.е. продолжить процесс суммирования до тех пор, пока член ряда \|Sn\| не станет меньше ε. {ε = 10-5}	Pascal ABC Вычислить значение функции Помогите с задачей. Написать программу вычисления функции y = f(x) с использованием стандартных функций: y=x-\sqrt{x+2} Данные, которые вводит пользователь: x=0.1; x=0.2 https://www.cyberforum.ru/ pascalabc/ thread1076924.html
Pascal ABC Задать массив случайным образом. Найти количество элементов, больших заданного числа, в массиве https://www.cyberforum.ru/ pascalabc/ thread1076913.html 2. Задать массив случайным образом. Найти количество элементов, больших заданного числа, в массиве.	Определить самый холодный день января и дни, когда был мороз Pascal ABC Даны показатели температуры воздуха ежедневно января. Определить САМЫЙ ХОЛОДНЫЙ день января и дни, когда БЫЛ мороза. . (+3; +2; +1, 0, -4; -6; -8; -10; -5; -4; -1; +1, 0, -5; -8; -10; -13 ; 18; 20; -17; -14; -10; -5, -1, -1, 0, +2; +1: -2; -4; -6)
Pascal ABC Есть входной файл с координатами вершин графа. Нужно построить путь максимальной длины https://www.cyberforum.ru/ pascalabc/ thread1076889.html Есть входной фаил с координатами вершин графа. Нужно построить путь максимальной длины. Путь по правилу: из всех возможных элементов, связанных с данным, в путь включается ближайший элемент. Кто может подсказать как вводить координаты из файла? Как можно изменить алгоритм Дейкстры чтобы рассматривать координаты, а не просто число ?	Pascal ABC Создать базу данных, имеющую текстовое меню и данные об одноклассниках https://www.cyberforum.ru/ pascalabc/ thread1076873.html «Одноклассники» - фамилия - месяц и год рождения - номер телефона Составить типизированный файл. Данные вводить в файл. Производить поиск по фамилии, а также именинников одного месяц рождения и выводить результаты на экран и в другой файл. В случае отсутствия человека с заданной фамилией выводить соответствующее сообщение. Добавлять записи в файл. Сортировать данные по фамилии. Помогите...
Pascal ABC Построение выпуклой оболочки множества точек Помогите с программой! Заранее благодарна!!! Построение выпуклой оболочки множества точек Алгоритм Эндрью (Улучшенный алгоритм Грэхема) Входной файл: В первой строке 1 число – количество точек заданного множества. В следующих строках по два числа – координаты точек. Выходной файл: В первой строке 1 число – количество точек выпуклой оболочки.	Pascal ABC Даны N вертикальных и K горизонтальных полос. Каждая полоса может быть частично или полностью перекрыта другими полосами. Найти площади пересечения Задача из вычислительной геометрии! Помогите! Заранее благодарна! Даны N вертикальных и K горизонтальных полос. Каждая полоса может быть частично или полностью перекрыта другими полосами. Найти значение площади пересечения этих полос. Входные данные: В первой строке 2 числа целых числа - количество вертикальных и горизонтальных полос. В следующих строках по 2 числа координаты начала и... https://www.cyberforum.ru/ pascalabc/ thread1076864.html

El41

For i:=0 to 150 do

225 / 105 / 108

Регистрация: 05.01.2012

Сообщений: 286

21.01.2014, 01:28

Ввести массив, состоящий из 10 элементов с клавиатуры. Удалить все элементы после 3-его элемента массива - Pascal ABC - Ответ 5669970

21.01.2014, 01:28. Показов 5660. Ответов 3

Метки (Все метки)

Ответ

3 задача

Pascal

uses crt;
var
a:array[1..10] of integer;
i:byte;
begin
 
for i:=1 to 10 do
  begin
  writeln('введите ',i,' элемент массива');
  readln(a[i]);
  end;
clrscr;
writeln('Ваш массив');
 
for i:=1 to 10 do
write(a[i],' ');
 
writeln('Удалим все после 3');
 
for i:=4 to 10 do
  a[i]:=0;
  
writeln('Новый массив');  
for i:=1 to 10 do
write(a[i],' ');
 
end.

Вернуться к обсуждению:
Ввести массив, состоящий из 10 элементов с клавиатуры. Удалить все элементы после 3-его элемента массива Pascal ABC

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

21.01.2014, 01:28

Готовые ответы и решения:

Задан массив A, состоящий из 10 целых элементов. Вывести все элементы массива, которые идут после первого максимального элемента
Задан массив A, состоящий из 10 целых элементов. Вывести все элементы массива, которые идут после...

Переписать в массив все элементы заданного массива, стоящие после его минимального элемента
Переписать в одномерный массив K все элементы заданного целочисленного массива L , стоящие после...

Массив. Удалить все положительные элементы, имеющие четный порядковый номер, идущие после минимального элемента массива
11. В массиве A=(a1, а2, ..., аn) удалить все положительные элементы, имеющие четный порядковый...

Дан одномерный массив А, состоящий из N элементов. Перенести в начало массива все четные элементы, а в конец массива - все нечетные
Помогите, пожалуйста. >>"Дан одномерный массив А, состоящий из N элементов. Сколько значений...

	21.01.2014, 01:28

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

21.01.2014, 01:28

Помогаю со студенческими работами здесь

Ввести массив А. В массив В перенести все элементы массива А, стоящие правее максимального элемента, и имеющие нечетный индекс. Массив В отсортировать
Добрый Вечер! Написал первую часть программы по этому заданию"Ввести массив А. В массив В перенести...

Ввести с клавиатуры одномерный массив, состоящий из 10 элементов
Ввести с клавиатуры одномерный массив, состоящий из 10 элементов. Заменить в нем каждый нулевой...

Дан одномерный массив А, состоящий из N элементов. Отсортировать все его элементы улучшенным методом пузырька
Дан одномерный массив А, состоящий из N элементов. Отсортировать все его элементы улучшенным...

Наверх