Проверить,поместится ли на диске компьютера музыкальная композиция,которая длится m минут и n секунд,если свободное дисковое пространство 6 мегабайтов,а для записи одной секунды звука необходимо 16 килобайт(Pascal ABC)
Проверить,поместится ли на диске компьютера музыкальная композиция,которая длится m минут и n секунд,если свободное дисковое пространство 6 мегабайтов,а для записи одной секунды звука необходимо 16 килобайт(Pascal ABC)
Гость
Ответ(ы) на вопрос:
Гостьprogram musica;
var m, n:integer;
begin
write('Введите количество минут и секунд через пробел: ');
readln(m, n);
if (16 * (m * 60 + n) <= 6 * 1024) then writeln('Песня поместится')
else writeln('Песня не поместится');
end.
Не нашли ответ?
Похожие вопросы