На бельевой верёвке висят X футболок. Повешены они вплотную друг к другу. Сколько пар носков (тоже вплотную) можно разместить на оставшейся свободной части верёвки, если длина верёвки L м, футболка занимает F см верёвки, а носок N см? Разработайте программу для решения этой задачи.
В VISUAL BASIC.
216
317
Ответы на вопрос:
Используя паскаль: var rndm: array[1..20] of longint; i,n1.n2,c : longint; begin for i: =1 to 20 do rndm[i]: =i; for i: =1 to 100 do begin n1: =random(19)+1; n2: =random(19)+1; c: =rndm[n1]; rndm[n1]: =rndm[n2]; rndm[n2]: =c; end; for i: =1 to 20 do write (rndm[i],' '); end.
Популярно: Информатика
-
LebedevAleksand18.01.2023 17:50
-
Тимофейзъ24.02.2021 20:28
-
lilyok200609.02.2021 18:39
-
dashko4etckowa06.03.2022 21:27
-
ДАШУНЯ131131.12.2021 12:04
-
тучя02.10.2022 23:16
-
glebyurchenko09.02.2020 16:34
-
nastya19042013.04.2023 15:21
-
2a74129.05.2022 03:49
-
SergeyPomoshnik27.02.2022 17:08