Чтобы создать новую молнию, ему потребуется X секунд. Сколько шаровых молний он сможет выпустить в Зума за N минут и M секунд.

program zz1;

var

M, N, X, c: integer; / / задаем переменные целого типа

begin

write (' введите число Х секунд '); / / вводим с клавиатуры число секунд

read (X);

write (' введите число N минут '); / / вводим с клавиатуры число минут

read (N);

write (' введите число M секунд '); / / вводим с клавиатуры число секунд

read (M);

c : = N * 60 + M; / / переводим время в секунды

writeln (c div X, ' шаровых молний он сможет выпустить в Зума за ', N, ' минут и ', M, ' секунд '); / / выводим ответ

end.