М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
missisleos
missisleos
24.07.2021 12:57 •  Информатика

ПАСКАЛЬ! 1.Дан массив из 8 элементов.Элементы вводятся с клавиатуры.Найти произведение четных элементов массива.(делятся на 2,с остатком 0)
2.Дан массив из 14 элементов.Элементы заполнены из промежутка 12;92.Найти сумму элементов массива.

👇
Открыть все ответы
Ответ:
ClassikStupidMasha
ClassikStupidMasha
24.07.2021

===== PascalABC.NET =====

begin

 ReadLines('Sonet90.txt').

   Where(p -> p.Length > 0).

   Select(p -> p.ToUpper.MatchValues('[A-z]').

   GroupBy(p -> p).Select(p -> (p.Key, p.Count)).

   OrderBy(p -> -p[1]).ThenBy(p -> p[0]).First).

   Foreach(p -> Writeln(p[0], ' ', p[1]))

end.

В тестовом файле с именем Sonet90.txt (он прикреплен) находится оригинал известного сонета Шекспира №90. В нем есть и пробелы, и знаки препинания и даже пустая строка.

Then hate me when thou wilt; if ever, now;

Now, while the world is bent my deeds to cross,

Join with the spite of fortune, make me bow,

And do not drop in for an after-loss:

Ah, do not, when my heart hath 'scoped this sorrow,

Come in the rearward of a conquer'd woe;

Give not a windy night a rainy morrow,

To linger out a purposed overthrow.

If thou wilt leave me, do not leave me last,

When other petty griefs have done their spite

But in the onset come; so shall I taste

At first the very worst of fortune's might,

And other strains of woe, which now seem woe,

Compared with loss of thee will not seem so.

Во втором вложении показана работа программы.


Написать код в паскале в исходном текстовом файле записаны строки, содержащие текст на языке. требу
4,6(52 оценок)
Ответ:
ариша037
ариша037
24.07.2021

ответ: D) для записи разбросанных по диску файлов на новые места в оптимальной форме​

Объяснение: Под дефрагментацией понимается сам процесс собирания отдельных частей в одно отведенное место. При этом происходит сбор разбросанных по винчестеру фрагментов одного файла. Кроме того, все записанные данные оказываются в начале, а свободные ячейки в конце диска. Это позволяет:

ускорить доступ к данным;

быстрее загрузить программы и файлы;

повысить быстродействие в ресурсоемких программах;

увеличить скорость записи на диск.

4,4(41 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ