Помогите решить задачку........В первый час работы рабочий изготавливает а деталей, за каждый последующий час - на d деталей больше, чем за предыдущий. Разработайте программу, которая подсчитывает, сколько деталей изготовил раб...
Помогите решить задачку........В первый час работы рабочий изготавливает а деталей, за каждый последующий час - на d деталей больше, чем за предыдущий. Разработайте программу, которая подсчитывает, сколько деталей изготовил рабочий за 8 часов работы.
Гость
Ответ(ы) на вопрос:
ГостьProgram z1;
var a,d: integer; s: real
begin
writeln ('Введите a и d');
readln (a,d);
S:=(2*a+d*(8-1))/2*8
writeln ('Количество деталей за 8 часов=', s)
end.
Не нашли ответ?
Похожие вопросы