Question

Помогите пожалуйста!!! Нарисовать блок-схемы для решения двух задач. 1)Составьте алгоритм, вычисляющий число бит, если задано число Мбайт. Количество Мбайт вводится. 2) Ввести число. Если оно четное, разделить его на 4, если нечетное - умножить на 5.

Answer 1

1.
var mBytes, bit: int64;

begin
readln(mBytes);
bit := mBytes * 1024 * 1024 * 8;
writeln(bit)
end.

2.
var
a: integer;
begin
readln(a);
if a mod 2 = 0 then writeln(a div 4);
else writeln(a * 5);
end.

Answer 2

Блок-схема для решения первой задачи (вычисление числа бит в заданном числе Мбайт):

1. Начало 2. Ввод количества Мбайт 3. Умножение количества Мбайт на 8 (так как 1 байт = 8 бит) 4. Вывод результата 5. Конец

Блок-схема для решения второй задачи (деление четного числа на 4 или умножение нечетного числа на 5):

1. Начало 2. Ввод числа 3. Проверка на четность: - Если число четное, переходим к шагу 4 - Если число нечетное, переходим к шагу 5 4. Деление числа на 4 5. Умножение числа на 5 6. Вывод результата 7. Конец