Тема: §6.6 Цикл з лічильником
Завдання: ст.216 вправа №4:
Складіть блок-схему алгоритму знаходження суми шести чисел, перше з яких дорівнює 100, а кожне наступне число у 5 разів менше від попереднього. Виконайте алгоритм.
var s, n, i: integer;
begin
n:= 100;
S:=0;
for i:= 1 to 6 do
begin
S:=s+n;
n:=n/5;
end;
label1.caption:=inttostr(s);
end;
Яка сума вийде в результаті виконання програми?
Результат роботи відправте вчителю