Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

Помогите пожалуйста написать программу в PASCAL!

10-11 класс

Дан целочисленный массив X(N). Сформировать массив Y из элементов массива X, которые нечетные или отрицательные.

Катя919 31 янв. 2017 г., 10:29:23 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Sirozhahomenko
31 янв. 2017 г., 11:55:12 (7 лет назад)

Ок, будем считать, что элементы массва мы задаем с клавиатуры. uses crt; var i,o,n: integer; x,y : array [1..100] of integer; begin clrscr; writeln('Задайте число N'); readln(n); writeln( 'Задайте ',n,' элементов массива'); for i:=1 to n do readln(x[i]); o:=1; for i:=1 to n do if (x[i] < 0 ) or (x[i] mod 2 =1) then begin y[o] := x[i]; o:=o+1; end; writeln('Массив У'); for i:=1 to o-1 do writeln(y[i]); end. Ну вроде как так. Спрашивай, если что.

Ответить

Другие вопросы из категории

1.Напишите алфавит для системы счисления с основанием 20.

2.Получить развернутую форму десятичного числа 32478,38.

2. Протабулируйте функцию у = xsin2x на промежутке [-2; 2] с шагом 0,2 и вычислите среднее арифметическое отрицательных значений. 3.

Найти все целые числа из промежутка от 300 до 600, у которых сумма делителей кратна 10.

4. Протабулируйте функцию у = xcos2x на промежутке [-2; 2] с шагом 0,25 и вычислите среднее арифметическое положительных значений.

5. Вычислить 14 значений элементов последовательности, которая образуется с помощью рекуррентной формулы: an+2 = (an+1 + an)/2, где a0 = 1, a1 = 2

Задан ряд последовательных натуральных чисел от n до m (n <m<1000000), из которого удаляют сначала все числа, стоящие на нечетных местах,

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

Читайте также

написать программу на Assembler

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

задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов

Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.

заранее огромное спасибо всем!

Помогите,пожалуйста, написать программу по теме "Ветвление в алгоритмах" для Pascal. Задача: определить существует ли треугольник со сторонами AB

C и, если существует, то какой он (равнобедренный, равносторонний, произвольный).

Заранее большое спасибо!

программа на C++ в визуальном режиме (есть несколько вариантов кода программы)

доброй ночи, уважаемые программисты и успевающие в учебе студенты. помогите, пожалуйста, написать программу на C++ (в визуальной вкладке).

ВОТ ЗАДАНИЕ:
дано три переменные вещественного типа. если их значения упорядочены по возрастанию или убыванию, то удвоить их; иначе заменить значение каждой переменной на противоположное. вывести значения переменных.


я прикрепила несколько тестовых файлов (блокнот) в которых есть несколько вариантов решение этого задание (то есть коды программ), а вы скажите какой из них лучше всего подходит, а также скажите какие компоненты нужно кинуть на форму-дизайн (то есть какие кнопки, и что на них писать). в этих 3 файлов есть написанный код программы, нужно написать: на какие кнопки что писать и какой вариант решение больше подходит.

заранее огромное спасибо всем за помощь!!!

Помогите, Пожалуйста, с программой Паскаль. Рассмотрим целочисленный массив А[1..N] при N <= 100.

Написать программу, которая вычисляет среднее арифметическое элементов с четными индексами и среднее арифметическое с нечетными индексами.
Ввод: Число N и элементы массива вводятся из Файла.
Вывод: В файл должны быть введены 2 вычисленных значения

Помогите пожалуйста написать программу в паскале.

Составить программу перевода натурального числа из десятичной системы счисления в двоичную

10-11 класс информатика ответов нет


Вы находитесь на странице вопроса "Помогите пожалуйста написать программу в PASCAL!", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.