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

ОТВЕТЫ

Georgij
Oct 24, 2020
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.
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.
- блок схема
902
Смежные вопросы: