Напишите программу для нахождения суммы цифр заданного трехзначного числа.

в 4-м тыс. до  н.  э. из многих небольших территориальных образований  — номов  — возникло два политических объединения  — верхний египет и нижний египет (со столицами в иераконполе и буто). создание единого государства приписывают правителю верхнего египта менесу. столицей объединённого государства около 3000  г. до  н.  э. стал мемфис.

только какое отношение это имеет к информатике?

2гбайта=2000000байт

2000000байт/400байт=5000текстовых файлов

var n,z: longint;

begin

  read(n);

  z: =abs(n);

  z: =z-2;

  writeln(z);

end.

теперь не плагиат

program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.