Составить программу. В кинотеатре 25 рядов кресел в 1 ряду 15 кресел в каждом последующем на 2 кресла больше. сколько всего мест в зрительском зале

Question

Ульяна

27 октября, 18:01

+4

Ответы (1)

Знаешь ответ?

Натолий · Answer 1

Var i, k, s:integer;

begin

k:=15-2;

for i:=1 to 25 do

begin

k:=k+2;

s:=s+k;

end;

writeln ('Количество кресел = ', s);

end.