Войти Регистрация Спроси ai-bota

Паскаль авс.net программы . массивы подсчитайте количество элементов одномерного массива, абсолютная величина которых совпадает со своим номером.

Ответ:

Vaz21121

05.10.2020 23:31

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ReadSeqIntegerWhile('Вводите числа, окончание - 0:',x->x<>0).ToArray;
Writeln('Искомое количество: ',a.Where((x,i)->abs(x)=i+1).Count)
end.

Пример
Вводите числа, окончание - 0: 3 2 7 11 -6 3 -7 16 0
Искомое количество: 2

0,0(0 оценок)

Популярные вопросы: Информатика

диана2376

14.08.2021 04:27

Имеет ли вы опыт работы с текстовым процессором? Если да, то с каким именно?...

olesajhik

01.02.2023 09:50

составьте алгоритм вычисления расстояния между двумя точками x1, y1, x2, y2(использую теорему Пифагора....

MrGromFull

26.09.2020 20:37

Тема урока: Движение робота по линии урок№1 1.Вспомни режимы датчика цвета!2. Изучи предложенный программный код и расставь действия алгоритма в правильном порядке. (фото)A....

Natasha2910

25.08.2020 18:11

Информационый обём изображения размеров 30×30 точек равен 1012,5 байт. определить количество цветов в палитре, используемой для этого изображения....

khgssfghdwwcnoy

25.08.2020 18:11

1. сколько символов содержит сообщение, записанное с 800-символьного алфавита, если объём его составил 400 бит? 2. в некоторой книге без картинок 20 страниц. на каждой странице...

ЛизаНагайцева03

25.08.2020 18:11

Цветное ( с палитрой 256 цветов ) растовое графическое изображение имеет размер 25×40 точек. какой информационый обём имеет изображение (ответ запишите в байтах)?...

zalinairina9

25.08.2020 18:11

Информатика 6 класс тест на тему сжатие информации.программы архиваторы...

foma2004korol

10.10.2020 00:54

Для записи текста использовался 64-символьный алфавит. какой объём информации в байтах содержат 3 страниц текста, если на каждой странице расположено 30 строки по 60 символов...

elvirabondar2

10.10.2020 00:54

Сколько символов содержит сообщение, записанное с 256-сомвольного алфавита, если объем его составил 1/32 часть мбайта?...

ВикаГросс

10.10.2020 00:54

Рассчитайте время звучания стерео аудио файла, если при 32 битной глубине звука и частоте дискретизации 48000 гц его объём равен 3750 кбайт...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку