tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
решить задачи, язык: Pascal
решить задачи, язык: Pascal
hadika2006
2 02.07.2020 12:05
1
Ответы
ggez2
15.10.2020 15:09
PascalABC.NET
Задание 1:
begin var n := ReadInteger('n:'); var a := MatrRandom(n, n, -27, 28); a.Println; a.ElementsByRow.Product(x -> x<>0 ? BigInteger(x) : 1).Print end.
Задание 2:
begin var n := ReadInteger('n:'); var a := ArrRandom(n, -18, 24); a.Println; a.Where(x -> x<0).ElementAt(2).Print end.
Примеры работ:
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ученик22826
28.09.2019 09:40
Найди и отметь лишнее устройство в группе: мышь световое перо тачпад джойстик клавиатура...
123fafafartgd
28.09.2019 09:40
Объясните развернутым ответом для по каналу связи сообщения, содержащие только четыре буквы: а, б, в, г. для передачи используется двоичный код, удовлетворяющий условию...
ойооы
05.03.2021 13:17
ИНФОРМАТИКА задание 1 Что будет выведено на экран после выполнения данной программы: Program Primer; var c1,c2: integer; function Apb(a,b: integer): integer; begin...
akselroddasha
22.10.2020 10:20
4. Закодируй изображение юрты на листе в клетку с дво- ичного кода (графическое кодирование с 4 заданием сор 5 класс информатика ...
БелаяЧёрнаяБелка
22.10.2020 10:20
В растровой графике изображения представлены маленькими точками, которые называются «пикселями». Пиксель характеризуется цветом. В цветных изображениях каждому пикселю...
Phelper
22.10.2020 10:20
Отметте начиная с маленькой к большой еденицы измерения информации? A Mega byte - KilobyteВ. Bit-Exo byteC. Tero byte - Peto byteD. Kilo byte - Byte...
T1mon4ikRYTP
22.10.2020 10:20
Ученик смотрит видеоурок, предложенный учителем. Укажи источник, приёмник и информационный канал для этой ситуации последнее слово в фото если что канал...
Миша1112994
10.05.2020 12:30
1. Запустите текстовый редактор. Наберите текст« Казахстан расположен в центре континента Евразия и занимает девятое место в мире поплощади. На востоке, севере и...
Angelinamskul
10.05.2020 13:17
Как изменить существующий за предложите два информатика 9 класс...
34224253
15.03.2021 23:52
Как изменится сила, действущая между двумя параллельными отрезками проводов с током, если увеличить в 3 раза длину обоих проводников? ответ поясни формулой...
Популярные вопросы
Найти верное решение на дереве сидело 3 голубя ,это в 3 раза меньше,...
3
Знайти головны члени речення: солов я по пісні впізнають, а папугу...
1
Когда незнайка первый раз подсчитал в классе носы девочек и уши...
2
Сказахстана: используя слова : гунны, конец 3 века до нашей эры,...
2
Уисполнителя аккорд две команды, которым присвоены номера: 1....
3
Джереми считает что разные лампы должны гореть по разному. его...
2
Мен мектептемін тақырыбына әңгіме құр....
2
Решите неравенство плз на завтра много ,мне не !...
1
Оповідання на тему материнська любов найсильніша...
1
2.b) make a list of ten questions to see if your classmates can...
1
Задание 1:
begin var n := ReadInteger('n:'); var a := MatrRandom(n, n, -27, 28); a.Println; a.ElementsByRow.Product(x -> x<>0 ? BigInteger(x) : 1).Print end.Задание 2:
begin var n := ReadInteger('n:'); var a := ArrRandom(n, -18, 24); a.Println; a.Where(x -> x<0).ElementAt(2).Print end.Примеры работ: