1) var a,b,c:integer;k:integer;beginreadln (a,b,c3 4);k:=0;if (a mod 4=0) and (a mod 10=0) then k:=k 1;if (b mod 4=0) and (b mod 10=0) then k:=k 1;if (c mod 4=0) and (c mod 10=0) then k:=k 1;writeln (k);end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.