Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
59 / 58 / 39
Регистрация: 16.03.2012
Сообщений: 165
1

Вывести список городов, которые напрямую сообщаются более чем с М городами

23.11.2017, 21:29. Показов 1066. Ответов 0
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Имеется список N городов и задан список пар городов, между которыми существует прямая дорога. вывести список городов, которые напрямую сообщаются более чем с М городами.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
uses crt;
const n=4;
var a:array [1..n] of string;
b: array [1..n,1..n] of byte;
i,j,k,m,t:byte;
zi:char;
begin
writeln('Введите названия городов');
for i:=1 to n do begin
write(i,')');
read(a[i]);
end;
repeat
writeln('Введите номера пар городов, между которыми существует прямая дорога');
readln(m,t);
writeln('Есть еще пары y/n');
zi:=readkey;
read(zi);
until zi='n';
for i:=1 to n do
for j:=1 to n do begin
if (m=i) and (t=j)  then
b[i,j]:=1;
if (m<>i) and (t<>j) then b[i,j]:=0;
writeln('b[',i,',',j,']=',b[i,j]);
end;
end.
А как сделать, чтоб в матрицу записывались все введенные варианты, а не только последний?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.11.2017, 21:29
Ответы с готовыми решениями:

Напечатайте список городов, которые напрямую сообщаются более чем с тремя городами
Уважаемы формучане,объясните пожалуйста кое-что. Вот задача: Пусть имеется N городов и...

Вывести все пары городов связанных между собой не напрямую, но не более чем с одной пересадкой
Сеть авиалиний, соединяющих города, задана матрицей связанности M(k,k), где M=0 если города i,j не...

Напечатать все пары городов, связанных между собой не напрямую, но не более чем с одной пересадкой
Помогите пожалуйста в C++ Сеть авиалиний, соединяющая города, задана матрицей связности M(k,k),...

Вывести слова сообщения, которые содержат не более чем n букв
• Вывести слова сообщения, которые содержат не более чем n букв. помогите,плиззз

0
23.11.2017, 21:29
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.11.2017, 21:29
Помогаю со студенческими работами здесь

Вывести только те слова сообщения, которые содержат не более чем n букв
Дана строка, в которой содержится осмысленное текстовое сообщение. Слова сообщения разделяются...

Вывести только те слова сообщения, которые содержат не более чем n букв
Условие: Вывести только те слова сообщения, которые содержат не более чем n букв. C#

Вывести только те слова сообщения, которые содержат не более чем n букв
Помогите пожалуйста написать программу: дана строка, в которой содержится осмысленное текстовое...

Вывести только те слова сообщения, которые содержат не более чем n букв
1. Вывести только те слова сообщения, которые содержат не более чем n букв.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru