Question

СОСТАВИТЬ БЛОК СХЕМУ ОЧЕНЬ СРОЧНО!!! ДАЮ 35б!! Program musica; var m, n:integer; begin write ('Введите количество минут и секунд через пробел: ') ; readln (m, n) ; if (18 * (m * 90 + n) < = 9 * 1024) then writeln ('Песня поместится') else writeln ('Песня не поместится') ; end.

Answer 1

Ответ:

Начало (обвести в круг)

m,n (в параллелограмм)

(18 * (m * 90 + n) < = 9 * 1024) (В ромб)

потом линии от ромба в лево вправо

продолжаешь их вниз

1й прямоугольник ('Песня поместится')

2й  ('Песня не поместится')

линии вниз соединяешь в одну чуть вниз и  в овал конец

Объяснение:

Answer 2

Конечно, вот ваша блок-схема для данного кода:

vbnetCopy code
┌───────────────────┐
│   Начало программы   │
└───────────────────┘
           │
           ▼
┌───────────────────┐
│     Вывод текста    │
│ 'Введите количество │
│ минут и секунд      │
│ через пробел: '    │
└───────────────────┘
           │
           ▼
┌───────────────────┐
│   Ввод m и n       │
└───────────────────┘
           │
           ▼
┌───────────────────┐
│     Вычисление     │
│   выражения:      │
│  18 * (m * 90 + n) │
│     <= 9 * 1024    │
└───────────────────┘
           │
           │
           ▼
┌───────────────────┐
│ Ветвление: если    │
│ выражение истинно, │
│  то                 │
└───────────────────┘
           │
           ▼
┌───────────────────┐
│   Вывод текста:    │
│ 'Песня поместится'  │
└───────────────────┘
           │
           │
           ▼
┌───────────────────┐
│   Иначе, если      │
│   выражение ложно, │
│   то                │
└───────────────────┘
           │
           ▼
┌───────────────────┐
│  Вывод текста:     │
│ 'Песня не поместится'│
└───────────────────┘
           │
           ▼
┌───────────────────┐
│  Конец программы   │
└───────────────────┘

Обратите внимание, что это только абстрактная блок-схема, и в ней отсутствует детализация оформления символов и соединений. Вы можете нарисовать эту блок-схему на бумаге или использовать специальное программное оборудование для создания блок-схем.