Program a1; uses crt; var a,ed,sot,des:integer; begin ASSIGN (input,'input.txt') reset (input); ASSIGN (output,'output.txt'); rewrite (output); writeln (' vvedite chislo'); readln (a); ed:=a mod 10; sot:=a div 100; des:=a div 10 mod 10; sum:=des sot ed; writeln (sum); readln; CLOSE (input); close (output); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
