Предмет:
ИнформатикаАвтор:
hot saucemxdhПрограмма на языке 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.
Автор:
wallace74Добавить свой ответ
Предмет:
ГеометрияАвтор:
pantherglassОтветов:
Смотреть
Предмет:
МатематикаАвтор:
kennedywestОтветов:
Смотреть
Предмет:
ЛитератураАвтор:
jaquelineОтветов:
Смотреть
Предмет:
ФизикаАвтор:
titomaloneОтветов:
Смотреть