Var a,b,c,d,x: integer; begin x:=0; readln(a,b,c,d); if a=0 then inc(x); if b=0 then inc(x); if c=0 then inc(x); if d=0 then inc(x); writeln(x); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
