Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal Напишите программу для определения НОД трех натуральных чисел https://www.cyberforum.ru/ pascal/ thread86851.html Задача №5 Первоначальное напряжение в цепи равно 200 В. Известно, что оно меняется через каждую секунду следующим образом: через одну секунду оно уменьшается на M% , а еще через секунду увеличивается N%, затем снова уменьшается на M%, потом уменьшается на N% и т.д. Составить программу определения, через сколько секунд напряжение в цепи превысит 220В. Задача №6 Напечатать номера элементов...	Pascal решить в паскале=) 1.Задание: Написать программу с использованием трех операторов цикла: арифметического, предусловием и постусловием. Программа должна выводить на экран (при одинаковых начальных параметрах) три ответа: первый - полученный с помощью арифметического оператора, второй - с помощью оператора цикла с предусловием и третий - с помощью оператора цикла с постусловием. S = sinx+sin( в квадрате х)+....+...
Pascal Сформировать и вывести на печать массив М (15), элементы которого принадлежат интервалу... Сформировать и вывести на печать массив М (15), элементы которого принадлежат интервалу . Заменить на 100 каждый элемент массива М кратный 3-м, а четные элементы с нечетными индексами - удвоить. Буду очень признательна. https://www.cyberforum.ru/ pascal/ thread86844.html	Pascal Массив записей, товары Как точно не пойму сделать программу!! В магазин одежды был завезен товар из разных стран, из какой страны доставили самый дорогой товар, самый дешевый товар? Какой товар и из какой страны поступил в наибольшем количестве? Добавлено через 1 час 15 минут на языке паскаль https://www.cyberforum.ru/ pascal/ thread86842.html
Сравнить среднее арифметическое Pascal Задание: Сравнить среднее арифметическое четных чисел и нечетных чисел. Только по-простому, на уровне 9-ого класса. СРОЧНО помогите, пожалуйста!!!	Pascal Произведение матриц Задача: Даны две матрицы размером 3x3. Написать программу получения коммутатора АВ-ВА и антикоммутатора АВ+ВА этих матриц. Вычисление произведения матриц оформить в виде процедуры. https://www.cyberforum.ru/ pascal/ thread86830.html
Pascal Поиск максимума без алгоритма ветвления. https://www.cyberforum.ru/ pascal/ thread86815.html Задача состоит в том, что нужно найти максимум и минимум двух натуральных чисел, не используя алгоритм ветвления. Намекните хотя бы на мысль плз. Заранее спасибо!	Pascal Напишите,пожалуйста, программу на паскале Найти min и max
Pascal Растояние между точками. Нужно написать 4 программы!!!!!! Ну или хотябы сколько сможите!!!!!! Задания: 1. Даны координаты 2-х точек на плоскости (Ха;Yа) и (Xb;Yb). Составить программу вычисления расстояния между этими точками. Исходные данные водить с клавиатуры. На экран результат и исходные даные!!!!!!!!! 2.Дана сторона квадрата. Составить программу, которая определяет площадь кольца между вписаной в квадрат... https://www.cyberforum.ru/ pascal/ thread86812.html	Pascal сортировка матрицы Я по примеру отсортировал все столбцы матрицы по увеличению, методом обмена, потскажите где нужно задать условие чтобы отсортировать только положительные элементы. Исходник: Program w; uses crt; const n=4; m=5; var a: array of integer; k,t,i,j: integer; begin clrscr; Randomize; TextColor(green); writeln('Первоначальная матрица'); https://www.cyberforum.ru/ pascal/ thread86810.html
Вывести списки предприятий, выпускающих одинаковую продукцию. Pascal Даны массивы: H1,....,H5 шифры предприятий 1-ой группы HH1,...., HH8 шифры предприятий 2-ой группы N1,....., N5 наименование продукции предприятий 1-ой группы NH1,....., NN8 наименование продукции предприятий 2-ой группы Вывести списки предприятий, выпускающих одинаковую продукцию. Ребят, может кто нибудь помочь? Для сочувствующих, вот еще одна задача, но это если вы совсем хороший...	Pascal Телефонная книга Здравствуйте! Есть такое задание: по списку содержащему фамилии, имена и отчества, рабочий и домашний телефоны сформировать телефонную книгу. Но, добавлено вот что: исходные данные задачи должны вводиться из последовательного файла; последовательный файл формируется с помощью текстового редактора; последовательный файл переписывается в файл прямого доступа; обработка данных осуществляется с... https://www.cyberforum.ru/ pascal/ thread86808.html

Johnny B

3 / 3 / 1

Регистрация: 03.01.2010

Сообщений: 69

Задание размера матрицы вводом с клавиатуры - Pascal - Ответ 485591

17.01.2010, 19:21. Показов 3133. Ответов 1

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Задана квадратная матрица А размером NХN (N<=10), состоящая из действительных элементов. Заменить нулями все ее элементы расположенные на главной диагонали и выше нее.
Как заменить нулями элементы я знаю, но вот че-то запутался - никак не получается задать размер матрицы с клавы. Набросал примерный код, вот только размер там предопределенный изначально. Может кто-нить подскажет, как переделать?

Pascal

program PRG2;
Uses  Crt;
var
i,j           :integer;
a: array[1..3,1..3] of real;
begin
Clrscr;
writeln('Vvediteelementymatritsy ');
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
write ('?: ');
readln(a[i,j]);
end;
end;
clrscr;
writeln;
writeln('Ishodnayamatrytsa:');
writeln;
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
write(a[i,j]:5:2);
end;
writeln;
end;
writeln;
writeln('Rezultat:');
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
if i<=j then
begin
a[i,j]:=0;
end;
write(a[i,j]:5:2);
end;
writeln;
end;
writeln;
writeln('End of programm. PressENTER');
readln;
end.

Вернуться к обсуждению:
Задание размера матрицы вводом с клавиатуры Pascal

Следующий ответ

Заказать работу у эксперта

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

17.01.2010, 19:21

Готовые ответы и решения:

Задание размера матрицы
Подскажите, плз, как грамотно задать размер матрицы в следующем листинге. #include <iostream>...

Задание размера матрицы
У меня есть код, для создания матрицы, но он создает автоматически, как сделать так чтобы размер...

Ввести с клавиатуры значения матрицы В (10,10) произвольного размера n*n, где n<= 10. Найти среднее значение ее элементо
Ввести с клавиатуры значения матрицы В (10,10) произвольного размера n*n, где n<= 10. Найти среднее...

трабл с вводом с клавиатуры
суть программы я ввожу 2 числа и программа вычисляет такую штуку: число1%число2 в head объявляю...

	17.01.2010, 19:21

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

17.01.2010, 19:21

Помогаю со студенческими работами здесь

Управление вводом с клавиатуры в С++
Добрый день, подскажите как добиться вот этого результата на С++ вот пример: нажимаю я клавишу...

Посчитать уравнение с вводом значений с клавиатуры
По заданию нужно создать пользовательскую функцию DEFUN, посчитать уравнение, при этом значения a,...

Заполнить файл числами вводом с клавиатуры.
Ребята, помогите исправить... Нужно, что бы в этой программе не компьютер автоматически вводил...

Сортировка двумерного массива с вводом с клавиатуры
Нужно ввести с клавиатуры массив, затем по нажатию ентер он должен отсортироваться в виде столбца...

Дополнить программу вводом данных с клавиатуры
Здравствуйте ! Есть программа которая выводит данные(имя, фамилия, номер телефона, все с новой...

Заполнить массив String[] вводом с клавиатуры (Scanner)
Здравствуйте, Форумчане! Помогите, пожалуйста, решить насущный вопрос: Заполнить обычный...

Новые блоги и статьи
Как написать микросервис на 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 В контексте стремительного развития современных технологий особое внимание уделяется таким инструментам, как нейросети. Эти структуры, вдохновленные биологическими нейронными сетями, используются для. . .

Наверх