Вопрос от посетителя:
1. Вычислить и вывести на экран первые десять членов последовательности, заданной формулами n-го члена: xn = n²+5.
2. Известны фамилия, стоимость работы, время выполнения работы. Если работа выполнена раньше, чем за 15 дней, исполнитель поощряется денежной суммой в размере 10% от стоимости работы. Если работа выполнена с опозданием, то исполнителю начисляется пеня размером в 0,5% от стоимости работ за каждый день просрочки. Рассчитать итоговые суммы выплат исполнителям работ на момент их завершения.
3. Известна норма выработки деталей и фактическая выработка рабочего. Оплата труда рабочему за 1деталь – Х руб, за 1деталь сверх нормы надбавка Y%. Рассчитать величину оплаты.
прошу , очень помощь нужна.
Илюха отвечает:
1.
var n:integer;
begin
cls;
for n:=1 to 10 do begin
write(‘n=’,sqr(n)+5,’ ‘);
end;
end.
Решить на Паскале?