Поделитесь своими знаниями, ответьте на вопрос:
Из-за непогоды были отменены рейсы самолетов. ненадолго проглянуло солнце: на n часов и m минут. напишите программу, которая определяет, сколько самолетов успеет вылететь за это время, если на взлетной полосе может бытьтолько один самолет, а интервал между взлетом двух самолетов- z минут? формат входных данных: с клавиатуры вводятся через пробел 3 числа: n, m, z, обозначающие часы и минуты, на которые проглянуло солнце и интервал между взлетомдвух самолетов. формат входных данных: на экран вывести количество успевших взлететь самолетов. примеры входных и выходных данных: ввод: вывод: 1 12 33 2 1 15 25 3
программа на языке pascal, успехов в учебе.
program pr;
var n,m,z,k,i,vm: integer;
begin
readln (n,m,z);
vm: =n*60+m;
i: =1;
while i< =vm do
begin
k: =k+1;
i: =i+z;
end;
writeln (k);
readln;
end.