Вопрос задан 25.09.2023 в 10:01. Предмет Информатика. Спрашивает Франк Руслан.

В 21 веке мобильные телефоны вытеснили обычные будильники. Маша тоже выставляет бу-дильники на

своём смартфоне. Всего она хочет «з. ести» N будильников с интервалом в 5 минут. Саша пообещал Маше написать программу, которая по времени срабатывания первого будильника напечатает время срабатывания всех будильников Маши. Формат входных данных Программа Саши сначала узнаёт начальное время - часы Н и минуты М (0 < H < 24, 0 < М < 60). Эти два числа расположены в первой строке входных данных. Во второй строке входных данных записано число N - количество будильников Маши (1 < N < 1000). Формат выходных данных Программа должна вывести время срабатывания всех будильников Маши. Каждый «будильник» надо напечатать в отдельной строке, дополняя при необходимости часы и минуты ведущими нулями (см. Пример). Паскаль
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Козеева Олеся.

Ответ:

Объяснение:

program AlarmClock;

var

H, M, N, i: integer;

begin

readln(H, M);

readln(N);

write(H, ':');

if M < 10 then

write('0');

writeln(M);

for i := 2 to N do

begin

M := M + 5;

if M >= 60 then

begin

H := H + 1;

M := M - 60;

end;

if H >= 24 then

begin

H := H - 24;

end;

if H < 10 then

write('0');

write(H, ':');

if M < 10 then

write('0');

writeln(M);

end;

end.


0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Для написания программы на Паскале, которая решит данную задачу, вы можете использовать следующий код:

pascal
program AlarmClocks; var H, M, N, i, MinutesToAdd: Integer; begin { Ввод начального времени } ReadLn(H, M); { Ввод количества будильников } ReadLn(N); { Вычисление и вывод времени срабатывания будильников } for i := 1 to N do begin MinutesToAdd := 5 * (i - 1); M := M + MinutesToAdd; { Обработка переполнения минут } if M >= 60 then begin H := H + (M div 60); M := M mod 60; end; { Обработка переполнения часов } H := H mod 24; { Вывод времени с будильника } WriteLn(Format('%02d:%02d', [H, M])); end; end.

Эта программа сначала считывает начальное время (часы и минуты) и количество будильников N. Затем она вычисляет и выводит время срабатывания каждого будильника с интервалом в 5 минут, учитывая переполнение минут и часов. Каждое время срабатывания выводится в формате "часы:минуты" с ведущими нулями при необходимости.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос