Привет, помогите пжл.
Задание: использовать цены For подсчитать сумму первых 30 чисел натурального ряда и вывести на экран

1

Ответы и объяснения

2013-03-13T13:18:43+04:00

Язык ПАСКАЛЬ!!!!

 

var:a,b: integer;

begin

b:=0;

for a:=1 to 30 do

b:=b+a;

writeln (b);

end.