0 / 0 / 0
Регистрация: 21.10.2012
Сообщений: 3
1

По заданному номеру клетки найти номера всех клеток, имеющих с ней общую сторону

21.10.2012, 16:42. Показов 2058. Ответов 2
Метки нет (Все метки)

Проблема такая. Не могу сделать вот эту задачу:
Клетки шахматной доски пронумерованы от 1 до 64 по строчкам слева направо и снизу наверх. Написать программу, которая по заданному номеру клетки дает номера всех клеток, имеющих с ней общую сторону.

Примечание: Решить задачу с использованием оператора варианта.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.10.2012, 16:42
Ответы с готовыми решениями:

По заданному номеру клетки выдать номера всех клеток имеющих с ней общую сторону
Клетки шахматной доски пронумерованы от 1 до 64 по строкам слева напрпаво и снизу вверх.По...

По заданному номеру клетки выдать номера всех клеток имеющих с ней общую сторону
Клетки шахматной доски пронумерованы от 1 до 64 по строкам слева направо и снизу вверх.По...

Написать программу, которая по заданному номеру клетки дает номера всех клеток, имеющих с ней общую сторону
Клетки шахматной доски пронумерованы от 1 до 64 по строчкам слева направо и снизу наверх. Написать...

Напишите пожалуста программу :которая по заданному номеру клетки даст номер всех клеток,имеющих с ней общую сторону
Клетки шахматной доски пронумерованы от 1 до 64 по строчкам, слева на право и снизу вверх.Написать...

2
Заблокирован
21.10.2012, 17:07 2
Лучший ответ Сообщение было отмечено iDem как решение

Решение

Цитата Сообщение от iDem Посмотреть сообщение
использованием оператора варианта
интересно как тут можно вывести 4-х соседей, а без этого:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
var n: integer;
 
begin
 
  write('Номер клетки:');
  readln(n);
  if (n-1)mod 8<>0 then writeln('Сосед:',n-1);
  if (n-1)div 8>0 then writeln('Сосед:',n-8);
  if (n-1)mod 8<>7 then writeln('Сосед:',n+1);
  if (n-1)div 8<>7 then writeln('Сосед:',n+8);
 
  readkey;
end.
1
1 / 1 / 1
Регистрация: 30.10.2012
Сообщений: 10
01.11.2012, 20:36 3
Огромное спасибо
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
01.11.2012, 20:36
Помогаю со студенческими работами здесь

На ввод номера клетки вывести номера всех клеток, имеющих с ней общую сторону
Все клетки шахматной доски пронумерованы от 1 до 64 так, что первая строка клеток имеет номера от 1...

Найдите максимальную красоту среди красот всех клеток и количество клеток, имеющих такую красоту
Помогите с Олимпиадой задачкой. Проходит не все тесты: Видимость звездочек (упрощенная версия) ...

Список всех клеток, на которые может попасть конь с указанной клетки за один ход
Вам дана строка, содержащая координату клетки на шахматном поле (например, “A2”). Напишите функцию...

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru