Информатика 8-й класс надо решить пример по паскалю оператору цикла: найти сумму чисел...

Question

Информатика 8-й класс надо решить пример по паскалю оператору цикла: найти сумму чисел 2+4+6+8+10...+100

Answer 1

Var a,i:integer;
begin
while i<100 do begin<br> a:=a+i;
i:=i+2;
end;
write(a);
end.
изи

Comments

Хорошо модно еще 1? Найти сумму чисел 0.1+0.2+0.3...+2.5

---

var a,i:real;begin while i<2.5 do begin a:=a+i; i:=i+0.1; end; write(a);end.

---

во

---

Спасибки огромное!