ТутРешу.Ру

Будь-ласочка, допоможіть розв*язати задачку…

Задание:

Будь-ласочка, допоможіть розв*язати задачку, дуже-дуже трабаНа висаджування троянд в оранжереї, садівник Іван Петрович витрачає N год. З них A хв. Він витрачає на те щоб привезти воду, B хв. Щоб привезти кущі троянд. Решту часу садівник висаджує троянди. Скільки кущів троянд посадить Іван Петрович, якщо на саджання одно куща він витрачає С хв. Вхідні дані: Програма на вхід отримує чотири цілих числа N, A, B, C (1≤ N≤8, 0< A, B, C<60). Вихідні дані: Програма має вивести кількість посаджених кущів троянд.

Решение:

Программа на ПаскалеProgram pr; uses crt; var A,B,C,N: word; r: real; beginrepeatclrscr; writeln ('Введите N,C,A,B'); write ('N='); readln (N); write ('C='); readln (C); write ('A='); readln (A); write ('B='); readln (B); if (60*N>A+B) then begin r: =trunc (60*N-A-B) /C); writeln ('Количество роз — ',r); end else if (60*NA+B); end.




Знаете другой ответ?

Отправить свой ответ