Написать программу которая складывает числа от 4 до 100

Var i,sum: integer; begin for i: =4 to 100 do     begin          sum: =sum+i;           writeln('summa#',i,'=',sum);     end; end.

Написали бы на каком языке программирования вам нужно. вот на java ^_^ import java.io.bufferedreader; import java.io.inputstreamreader; public class prog {  public static void main(string[] args) throws exception{   bufferedreader reader = new bufferedreader(new   inputstreamreader(system.in));   while(true) {   int a = integer.parseint(reader.;   if(a%3==0){   system.out.println("делится");   }   else{   system.out.println("не делится");     }   }   }}

После 517 года до  н.  э. дарий ввёл в ахеменидской державе монетную единицу, составляющую основу единой для всей империи денежной системы, а именно золотой дарик весом 8,4 г. чеканка золотой монеты была прерогативой только персидского царя. тому, что дарик содержал всего 3  % примеси, он в течение нескольких веков занимал положение основной золотой монеты в торговом мире. серебряные и более мелкие медные монеты чеканили персидские сатрапы, а также автономные города и зависимые цари.