4σ (s! +s) s=1 найдите ошибку, program mar; uses crt; var f, s: integer; k: real; begin clrscr; f: =1; k: =0; for s: =1 to 4 do begin f: =f*s; k: =k*(f+s); end; writeln('k =',k: 4: 2); readkey; end.

вот так?

program solution; uses crt; var s : byte; res, fact : word; beginfact : = 1; res : = 0; for s : = 1 to 4 do              begin              res : = res + s + fact;               fact : = fact * (s + 1);               end; write(res); readkey; end.

а) наименование товаров, цена за единицу товара, количество каждого товара

б) общая сумма покупки, сумма денег переданная продавцу

в) программа телепередач, название фильма

г) набор значений углов и сторон треугольника, должна быть известна хотя бы одна сторона треугольника и еще две величины(углы или стороны)

1)котят 7

2)рыжих котят 5

3)зелоноглазых котят 3

4)котят рыжих и зеленоглазых 3

5)котят рыжих или зеленоглазых 3

6)рыжих и не зеленоглазых котят 3

7)не рыжих и не зеленоглазых 1