Сколько часов проработала вся бригада

@HeNKeR · Регистрация: 19.01.2011

Студворк — интернет-сервис помощи студентам

Помогите решить пару задач!

5) по теме цикл с параметром
В бригаде,работающей на уборке сена,имеется N сенокосилок.Первая сенокосилка работала m часов,а каждая следующая на 10 минут больше,чем предыдущая.Сколько часов проработала вся бригада

Заранее спасибо!

@marshal · 19.01.2011, 15:16

5

Pascal

program seno;
uses crt;
var n,i:integer;s,m:real;
begin
clrscr;
writeln('введите кол-во сенокосилок');
readln(n);
writeln('сколько часов первая работала?');
readln(m);
for i:=2 to n do
begin
m:=m+1/6;
end;
writeln(m);
end.

@HeNKeR 0 / 0 / 0 Регистрация: 19.01.2011 Сообщений: 7
		1
	Сколько часов проработала вся бригада 19.01.2011, 13:27. Показов 2065. Ответов 1 Метки нет (Все метки) Помогите решить пару задач! 5) по теме цикл с параметром В бригаде,работающей на уборке сена,имеется N сенокосилок.Первая сенокосилка работала m часов,а каждая следующая на 10 минут больше,чем предыдущая.Сколько часов проработала вся бригада Заранее спасибо! 0

	19.01.2011, 15:16

Опции темы

Сколько часов проработала вся бригада

Решение