Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Найти наибольшую длину монотонного участка последовательности https://www.cyberforum.ru/ turbo-pascal/ thread1618466.html
Задание: Найти наибольшую длину монотонного участка последовательности.
Прокомментировать код Turbo Pascal
Прочитайте пожалуйста тело программы по действиям , очень надо! начиная с FOR const m=5; n=4; var a: array of Integer; i, j, k, p, mn, mx: Integer; begin Randomize; for i:=1 to m do...
Turbo Pascal Дан целочисленный массив размера N. Удалить из массива все элементы, встречающиеся ровно два раза
Дан целочисленный массив размера N. Удалить из массива все элементы, встречающиеся ровно два раза. но удалять цифру а не ячейку и сделать это с помощью процедур и функций
Turbo Pascal Задачи на If и For 1)Для данной области составить линейную программу, которая печатает true, если точка с координатами (х, у) принадлежит закрашенной области, и false — в противном случае (надо делать через If, рисунок... https://www.cyberforum.ru/ turbo-pascal/ thread1618241.html
Turbo Pascal Определить номер треугольника с наибольшей гипотенузой https://www.cyberforum.ru/ turbo-pascal/ thread1618233.html
Даны три прямоугольных треугольника, катеты которых равны а1,а2; в1,в2; с1,с2 соответственно. Определить номер треугольника с наибольшей гипотенузой. Результат вывести на экран.
Массивы Turbo Pascal
Помогите написать программы в школу, инфу плохо понимаю( 1. замените все элементы массива целых чисел С(n) на противоположные по знаку 2. найти произведение элементов массива целых чисел А(n),...
Turbo Pascal Представить число в буквенном виде
Полная задача звучит так: Вводится 2 целых числа, первое положительное, второе любое Второе число выводится текстом Сверху и снизу строка выделяется количеством звездочек указанным первым числом....
Turbo Pascal Вычислить значения Ребят, помогите пожалуйста с задачи. Уже который день не могу решить( 1. Вычислить значения 33 элементов одномерного целочисленного массива Y в интервале (-6, 10) с использованием генератора... https://www.cyberforum.ru/ turbo-pascal/ thread1618036.html
Turbo Pascal Алгоритмы на графах https://www.cyberforum.ru/ turbo-pascal/ thread1617931.html
По системе двусторонних дорог определить, можно ли, перегородив какие-нибудь дороги, добиться, чтобы из города A нельзя было попасть в город B.
Turbo Pascal Определить, можно ли попасть из одного заданного пункта в другой Имеется n населенных пунктов, пронумерованных от 1 до n. Некоторые пары пунктов соединены дорогами (в том числе дорогами с односторонним движением). Определить, можно ли попасть по этим дорогам из... https://www.cyberforum.ru/ turbo-pascal/ thread1617874.html
охотник
1011 / 535 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
19.12.2015, 15:37 0

Определить число элементов одномерного массива предшествующих его первому нулевому элементу

19.12.2015, 15:37. Просмотров 784. Ответов 4
Метки (Все метки)

Ответ


Mazilo,
Pascal
8
k:=1;
Pascal
20
if k<10 then Writeln('k=', k) else writeln('нулевых элементов нет');


Вернуться к обсуждению:
Определить число элементов одномерного массива предшествующих его первому нулевому элементу
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.12.2015, 15:37

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Найти минимальное число, присвоить его значение первому элементу массива, а вместо минимального числа записать 10
Найти минимальное число, присвоить его значение первому элементу массива, а вместо минимального...

В массивах A(10) B(10) все элементы предшествующие первому нулевому элементу заменить на 0,5
Прошу Вас, помогите! Даны два массива A(10), B(10). В массивах A(10)b B(10) все элементы...

Прибавить к каждому элементу одномерного массива заданное число, найти сумму всех элементов полученного массива
Program qq; Var i,k:integer; a:array of integer; begin for i:=1 to 10 do read(a); read(k) for...

Найти количество элементов массива, предшествующих наибольшему элементу массива
Дан массив X(N). Найти количество элементов массива, предшествующих наибольшему элементу массива. ...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.