Война началась 22 июня 1941 в 4 часа утра

Товарищи!:) Помогите, пожалуйста, с информатикой! 

Что вычисляет приведённая ниже программа?

Program example;

Var x,y,z,I :integer;

Begin

  ReadLn(a,b,c);

  i:=0;

  If a>0 then i:=i+1;

  If b>0 then i:=i+1;

  If c>0 then i:=i+1;

  WriteLn(i)

End.

решите задачу начерти схему и по ней реши задачу длина огорода прямоуголной формы 16.35 м а ширена в 3 раза меньше четвёртая часть площади занята цветами третья чать оставшийся плошади занята клубникой остальная площадь овощами.Чему равна площадь участка занятого овощами? Зфпеши ответ в квадратных метрах.

О чем заставило задуматься произведение Шукшина "срезал" ?

Плотность некоторого газа по водороду равна 16. Вычислить массу этого газа, находящегося в газометре при 17°С и давлении 1,15*105