|
|
|
| Другие темы раздела | |
|
PascalABC.NET Дано натуральное число. Определите, сколько чётных цифр используется в записи этого числа
https://www.cyberforum.ru/ pascalabc-net/ thread1466335.html Дано натуральное число . Определите, сколько чётных цифр используется в записи этого числа. Нашёл на C++ а на Pascal ABC не нашёл ( Подскажите код . |
PascalABC.NET Написать код для закрашивания отмеченных точек Написать код для закрашивания отмеченных точек. Есть небольшой набросок, но не знаю как сделать что бы проверял клетки. uses Robot; begin Task('mix5'); var k: byte := 0; while not WallFromRight do begin |
|
PascalABC.NET Побитовое сравнение двухбайтовых целых чисел со знаком
https://www.cyberforum.ru/ pascalabc-net/ thread1466313.html Здравствуйте, подскажите как это осуществить? Задание: Сравнить на равенство два двухбайтовых целых числа со знаком путем побитового их сравнения. |
PascalABC.NET Оформить код в виде функции uses crt; var d:integer; begin clrscr; write('Введите номер дня недели 0..6 d='); readln(d); case d of 0:write('Понедельник'); 1:write('Вторник'); 2:write('Среда'); https://www.cyberforum.ru/ pascalabc-net/ thread1466300.html |
|
PascalABC.NET Записать с помощью процедуры var a: integer; var z, M: integer; begin writeln('Введите число М'); readln(M); repeat writeln('Введите отрицательное число (или 0 для прекращения программы)'); read(a); if a<0 then z:=z-a; until a = 0; |
PascalABC.NET Нахождение суммы чисел в последовательности Помогите используя подпрограмму процедуры переписать программу.Заранее благодарю) var // раздел описания переменных r,a: real; b:integer; begin // начало программы a:=0; b:=0; r:=1; writeln('Введите ненулевое число'); https://www.cyberforum.ru/ pascalabc-net/ thread1466166.html |
|
PascalABC.NET Переписать программу, используя функцию
https://www.cyberforum.ru/ pascalabc-net/ thread1466103.html Здравствуйте, помогите пожалуйста с паскалем, надо переписать программу используя функцию. var // раздел описания переменных r,a: real; b:integer; begin // начало программы a:=0; b:=0; r:=1; writeln('Введите ненулевое число'); writeln('(или введите 0 для конца последовательности) '); |
Переписать код с использованием процедуры PascalABC.NET Помогите пожалуйста с паскалем, надо переписать под процедурное, всю голову себе сломала( var a1, a2, a3, min: integer; begin writeln ('Введите три числа: '); readln (a1, a2, a3); if a1 <= a2 then min := a1 |
|
PascalABC.NET Составить блок схему к готовому коду
https://www.cyberforum.ru/ pascalabc-net/ thread1465907.html Помогите нарисовать блок-схему для этой программы: var arr1: array of integer; var arr2: array of integer; begin writeln('Первая матрица до:'); for var i:=1 to 5 do begin for var j:=1 to 5 do |
PascalABC.NET Нулевые элементы массива расположить в начале, остальные — по убыванию
https://www.cyberforum.ru/ pascalabc-net/ thread1465701.html Пытался сам, не получается Ввести массив a1,a2,...,a15. Требуется упорядочить его следующим образом: нулевые элементы расположить в начале массива, остальные - по убыванию. |
|
PascalABC.NET Найти максимальное произведение двух элементов массива, номера которых различаются не менее чем на 8 Для заданной последовательности неотрицательных целых чисел необходимо найти максимальное произведение двух её элементов, номера которых различаются не менее чем на 8. Значение каждого элемента последовательности не превышает 1000. Количество элементов последовательности не превышает 10000. |
PascalABC.NET В матрице положительные элементы заменить на обратные, а отрицательные возвести в квадрат
https://www.cyberforum.ru/ pascalabc-net/ thread1465459.html В задании матрицы записываются в файл (файлы), считываются из файла (-ов) и результат выводится в файл. В матрице А(9,4) положительные элементы заменить на обратные, а отрицательные возвести в квадрат. Вывести полученную матрицу. |
|
0 / 0 / 0
Регистрация: 02.06.2015
Сообщений: 6
|
|
| 03.06.2015, 08:50 [ТС] | 0 |
Для каждого столбца матрицы найти среднее арифметическое элементов, которые делятся нацело на последнюю цифру - PascalABC.NET - Ответ 771049703.06.2015, 08:50. Показов 1441. Ответов 2
Метки (Все метки)
Ответ
Спасибо большое!))))
Вернуться к обсуждению: Для каждого столбца матрицы найти среднее арифметическое элементов, которые делятся нацело на последнюю цифру PascalABC.NET
0
|
|
| 03.06.2015, 08:50 | |
|
Готовые ответы и решения:
2
Найти среднее арифметическое элементов, кратных 3, для каждого столбца матрицы
|
| 03.06.2015, 08:50 | |
| 03.06.2015, 08:50 | |
|
Помогаю со студенческими работами здесь
0
Найти среднее арифметическое элементов каждого столбца матрицы
|
Новые блоги и статьи
|
|||||
|
Как написать микросервис на Go/Golang
InfoMaster 14.01.2025
Определение микросервиса, преимущества использования Go/ Golang
Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .
|
Как написать микросервис с нуля на C#
InfoMaster 14.01.2025
В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .
|
Как создать интернет-магазин на PHP и JavaScript
InfoMaster 14.01.2025
В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .
|
Как написать Тетрис на Ассемблере
InfoMaster 14.01.2025
Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .
|
Как создать игру "Танчики" на Unity3d и C#
InfoMaster 14.01.2025
Разработка игр – это увлекательный процесс, сочетающий в себе творчество и технические навыки. В этой статье мы рассмотрим создание классической игры "Танчики" с использованием Unity3D и языка. . .
|
Организую платный онлайн микро-курс по доработке Android-клиента Telegram
_Ivana 14.01.2025
Официальная версия и распространенные форки не полностью устраивают? Сделай свою кастомную версию клиента!
4 занятия по 2 часа (2 недели пн, ср 19:00-21:00 по Москве).
Первое вводное занятие. . .
|
|
Как создать приложение для фитнеса для iOS/iPhone на Kotlin
InfoMaster 14.01.2025
Создание собственного фитнес-приложения — это не только захватывающий, но и полезный процесс, ведь оно может стать вашим верным помощником на пути к здоровому и активному образу жизни. В современных. . .
|
Как создать приложение магазина для iOS/iPhone на Swift
InfoMaster 14.01.2025
Введение в разработку iOS-приложений
Разработка приложений для iPhone и других устройств на базе iOS открывает огромные возможности для создания инновационных мобильных решений. В данной статье мы. . .
|
Это работает. Скорость асинхронной логики велика. Вопрос видимо останется в стабильности. Плата - огонь!
Hrethgir 13.01.2025
По прошлому проекту в Logisim Evolution https:/ / www. cyberforum. ru/ blogs/ 223907/ blog8781. html прилагаю файл архива проекта в Gowin Eda. Восьмибитный счётчик из сумматора+ генератор сигнала. . .
|
UserScript для подсветки кнопок языков программирования в зависимости от текущего раздела
volvo 13.01.2025
В результате работы этого скрипта подсвечиваются нужные кнопки не только в форме быстрого ответа, но и при редактировании сообщения:
/ / ==UserScript==
/ / @name CF_DefaultLangSelect
/ / . . .
|
Введение в модели и алгоритмы машинного обучения
InfoMaster 12.01.2025
Машинное обучение представляет собой одну из наиболее динамично развивающихся областей искусственного интеллекта, которая фокусируется на разработке алгоритмов и методов, позволяющих компьютерам. . .
|
Как на Python создать нейросеть для решения задач
InfoMaster 12.01.2025
В контексте стремительного развития современных технологий особое внимание уделяется таким инструментам, как нейросети. Эти структуры, вдохновленные биологическими нейронными сетями, используются для. . .
|
Наверх