Воздух-вещество, сок-вещество масло-тело молоко-вещество
Решения задач показаны в прилагаемом файле.
1) Формулы для столбца B (начиная с ячейки B4) имеют вид: =B3-C3
Формулы для столбца C (начиная с ячейки C4) имеют вид: =C3*1,08
Ответ: ≈7,5 час
2) Формулы для столбца F (начиная с ячейки F4) имеют вид: =F3*1,05
Формулы для столбца G (начиная с ячейки G4) имеют вид: =G3+F4
Ответ: ≈5 час
Последовательность.
Блин, это просто, он это будет делать по цепочке, как и перечислила его мать.
Var n,i,s:integer;
begin
write('n = '); readln(n);
s:=0;
for i:=1 to n do
if i mod 2 =0 then s:=s-i else s:=s+i;
writeln('s = ',s);
end.
Пример:
n = 10
s = -5
Program zzz;
var days:integer;
var discount, sum:real;
var days2:integer;
begin
readln(days, discount, sum);
days2 := 0;
sum := 0;
discount := discount / 10;
while( days2 <= days ) do begin
sum := sum + (sum * discount); {я не до конца понял задание, посему, скорее всего, придется тут менять}
sum := sum + 3;
days2 := days2 + 1;
end;
writeln('Ответ: ', sum);
<span>end.</span>