Нужно решить2 и 6 номер ДАЮ 30 БАЛЛОВ

Question

Нужно решить2 и 6 номер ДАЮ 30 БАЛЛОВ

---

Comments

я добавил

Answer 1

Ответ:

Объяснение:

2)

var a,i:integer;

begin

 a := 0;

 for i := 10 to 20 do

   a := a+i;

 writeln(a)

end.

6)

var a:integer;

begin

 a := 1;

 while a <= 16 do</p>

 begin

 writeln(a);

 a := a+3;

 end;

end.

3)

var a,i:integer;

begin

 a := 1;

 for i := 1 to 8 do

   a := a*i;

 writeln(a)

end.

Comments

Я ОШИБЛАСЬ МОШ

---

МОЖНО 3 НОМЕР

---

хорошо

---

только не пиши капсом))

---

ок

---

жду)

---

я добавил

---

очень выручил спасибо

---

поставь пять звёзд если не сложно))