Реши задачу, используя программу MS Excel.
Алина отправилась в магазин за покупками. Девушка купила пачку молока за 33 руб., две упаковки замороженных овощей, заплатив за каждую 133,28 руб.
Три пачки 2 % творога, заплатив за каждую пачку 55,46 руб. Пять килограммов мяса. Один килограмм мяса стоил в магазине 199,83 руб. Сколько денег Алина потратила в магазине?

Нужно построить таблицу со следующими столбцами (графами):

Наименование продукта.

Количество.

Цена за единицу.

Количество х цену.

Заполнить первые три столбца данными из условия. В ячейку D2 вписать формулу: = B2*С2. Формулу скопировать в ячейки D3:D5.

Поставить курсор в ячейку D6 и сделать щелчок по значку Сумма чтобы был выбран диапазон D2:D5. В ячейку будет вставлена формула =СУММ(D2:D5) и выведена затраченная сумма: 1300,82 .

var i,s: integer;

{1}begin

s: =0;

for i: =1 to 1000  do

if i mod 2=0 then s: =s+i;

end.

{2}begin

for i: =1 to 1000 do

if odd(i) then s: =s+i;

{3}a: array[1..500] of integer;

n: integer;

for i: =1 to 1000 do

if odd(i) then a[i]: =i;

n: =i;

for i: =1 to n do

s: =a[i]+s;

end.

var n, n1, n2, n3, k: integer;

begin readln(n); n1 : = 1; n2 : = 1; n3 : = 2; k : = 0; if (n=1) or (n=2) then k : = 1; while n3 < = n do begin if n3=n then k : = 1; n1 : = n2; n2 : = n3; n3 : = n1 + n2; end; if k = 1 then writeln(n, ' является числом фибоначчи') else writeln(n, ' не является числом фибоначчи'); end.