IDENTIFICATION DIVISION.
PROGRAM-ID. WAYS1.
AUTHOR. DMITRIY.
INSTALLATION. MyLocalComputer.
DATE-WRITTEN. 2025/22/01.
DATE-COMPILED. 2025/22/01.
SECURITY. GPL.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. X-86-64.
OBJECT-COMPUTER. X-86-64.
DATA DIVISION.
WORKING-STORAGE SECTION.
1 WS-N PICTURE IS S99999999999999999999999999999999999999.
1 WS-P PICTURE IS 99999999999999999999999999999999999999.
1 WS-W PICTURE IS 99999999999999999999999999999999999999.
PROCEDURE DIVISION.
BEGIN.
PARA-1.
ACCEPT WS-N.
IF WS-N IS LESS THAN ZERO DISPLAY 'ERROR'
ELSE
SUBTRACT 1 FROM WS-N GIVING WS-P
MULTIPLY WS-N BY WS-P GIVING WS-W
DISPLAY WS-W.
STOP RUN.
EXIT.
END PROGRAM WAYS1.
Дано число N — количество городов. Между каждыми двумя городами нужно установить по два железнодорожных пути: туда и обратно. Сколько всего путей нужно построить?
Ввод Вывод
3 6
10 90
Пример. Пусть городов 3: A, B и C. Между A и B — два пути, между B и C — два пути, между A и C — два пути. Значит, всего шесть путей.