Question

Срочно. Найдите сумму чисел от 0 до 30. Паскаль. Желательно с объяснением каждой строчки. Попроще.

Answer 1

var i,s:integer; //создаем целочисленные переменные i и s

begin //начало программы

s:=0; //задаём начальное значение переменной s

for i:=1 to 30 do s:=s+i; //создаём счётчик for от 1 до 30 с последующим суммированием в переменную s

writeln(s); //печатаем переменную s

end. //конец программы