Turbo Pascal

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

Войти

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

Другие темы раздела
Turbo Pascal Определить, что больше: сумма или произведение элементов массива. Найти ошибку https://www.cyberforum.ru/ turbo-pascal/ thread1184671.html Где ошибка Program t7iz1; uses crt; var a:array of integer; i,j:byte; s1,s2:real; begin clrscr; randomize; for i:=1 to 3 do begin for j:=1 to 5 do begin	Ввести репертуар театров, вывести список всех комедий Turbo Pascal Ввести репертуар театров, содержащий название театра, дата, спектакль, автор, тип спектакля (детский – для какого возраста; взрослый – пьеса, драма, комедия; музыкальный – композитор). Вывести...
Turbo Pascal Выделить желтым цветом в массиве элементы как на картинке и подсчитать их сумму Нужна ваша помощь в решении задания. На картинке нарисован двухмерный массив a. Нужно посчитать сумму всех ячеек закрашеных в жёлтый цвет. Пока удалось написать код программы который выделяет... https://www.cyberforum.ru/ turbo-pascal/ thread1184534.html	Turbo Pascal Определить количество сотрудников с минимальной зарплатой и количество с максимальной. Отсортировать таблицу Народ помогите нужно срочно написать таблицу. Нужно ввести фамилию, инициалы, должность, оклад. Необходимо сформировать таблицу, записав в нее известную информацию о каждом сотруднике. Создать поле... https://www.cyberforum.ru/ turbo-pascal/ thread1184524.html
Задан двумерный массив, состоящий из N строк и M столбцов (N, M<10). Написать программу определения суммы з Turbo Pascal Задан двумерный массив, состоящий из N строк и M столбцов (N, M<10). Написать программу определения суммы значений элементов, распо¬ложенных по контуру данного массива.	Turbo Pascal В массиве данных найти номер дня, когда средняя температура первый раз стала положительной Известны средние температуры суток в городе N за месяц. В массиве данных найти номер дня, когда средняя температура первый раз стала положительной. https://www.cyberforum.ru/ turbo-pascal/ thread1184520.html
Turbo Pascal Найти, сколько раз встречается в тексте буквосочетание "то" Дана строка текста. Найти:. сколько раз встречается в тексте буквосочетание «то» https://www.cyberforum.ru/ turbo-pascal/ thread1184512.html	Даны строки S1, S2 и символ C. После каждого вхождения символа C в строку S1 вставить строку S2 Turbo Pascal 7. Даны строки S1, S2 и символ C. После каждого вхождения символа C в строку S1 вставить строку S2.
Turbo Pascal Составить таблицу слов данного текста, начинающихся с буквы "А" 7. Составить таблицу слов данного текста, начинающихся с буквы "А". https://www.cyberforum.ru/ turbo-pascal/ thread1184510.html	Turbo Pascal Составить программу для вычеркивания из слов текста всех букв, стоящих на нечетных местах после буквы "а" https://www.cyberforum.ru/ turbo-pascal/ thread1184509.html Составить программу для вычеркивания из слов текста всех букв, стоящих на нечетных местах после буквы "а".
Даны две строки: S1 и S2. Удалить из строки S1 все подстроки, совпадающие с S2 Turbo Pascal 8. Даны две строки: S1 и S2. Удалить из строки S1 все подстроки, совпадающие с S2. Если таких подстрок нет, то вывести S1 без изменений.	Turbo Pascal Дана строка текста. Найти: длину самого короткого слова Дана строка текста. Найти: длину самого короткого слова https://www.cyberforum.ru/ turbo-pascal/ thread1184500.html

driveme

0 / 0 / 0

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

Сообщений: 25

Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными - Turbo Pascal - Ответ 6210410

22.05.2014, 13:47. Показов 978. Ответов 1

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

Где ошибка

Pascal

program ffwrewre4;
uses crt;
const n=20;
var a:array[1..n] of integer;
i,m:integer;
begin
clrscr;
randomize;
for i:=1 to n do begin
a[i]:=random(10);
write(a[i]:3);
end;
writeln;
For i:=1 to N do begin If odd(i) and odd(m[i]) then Writeln(m[i]);
readln;
end.

Вернуться к обсуждению:
Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными Turbo Pascal

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

__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь

Programming

Эксперт

94731 / 64177 / 26122

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

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

22.05.2014, 13:47

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

Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными
Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными.

Вывести элементы массива с нечетными номерами, являющиеся нечетными
Задан массив с количеством элементов N. Вывести элементы с нечетными номерами, являющиеся нечетными.

Задан массив x натуральных чисел из 20 элементов. Удалить из него элементы, являющиеся удвоенными нечетными числами
Сделал вот такую программу: #include <iostream> using namespace std; int main() {...

Массив: Вывести в начале элементы массива с чётными номерами, а потом с нечетными...
Дан массив A размер N. вывести в начале его элементы с чётными номерами (в порядке возрастания...

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

22.05.2014, 13:47

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

Массив: Вывести его элементы с нечетными номерами в порядке убывания номеров
Дан массив A размера N (N — нечетное число). Вывести его элементы с нечетными номерами в порядке...

Массив: Вывести вначале элементы массива с нечётными номерами в порядке возрастания номеров...
Дано массив А размеров N. Вывести вначале его элементы с нечётными номерами в порядке возрастания...

Одномерный массив. Вывести его элементы сначала с четными, потом нечетными номерами
Дан целочисленный массив A размера N.переписать в новый массив В того же размера вначале все...

Вывести на экран элементы массива в два столбика: в первый - элементы с нечетными номерами, во второй - элементы с четными номерами.
Заполнить массив различными действительными числами, случайно выбираются из указанного промежутка....

Наверх