Помогите! дана программа program summa_massiva; const m: array[1..6]of iteger...

Question

Помогите! дана программа program summa_massiva; const m: array[1..6]of iteger =(67,23,-7,0,99,3); var i, summa :integer; begin summa:=0; for i:=1to6do summa:=summa+m[i]; write ('summa elementov =',summa); end. нужно добавить в эту программу задержку экрана,очистку экрана и подключить библиотеку

Comments

ClrScr; очистка экрана

---

какую библиотеку надо подключить?

---

можно полностью куда вставлять?

---

незнаю

Answer 1

ClrScr; очистка экрана
Sleep(1000); в скобках время в миллисекундах - задержка
вставлять эти функции в тех местах, где это необходимо

---

Comments

в том месте где она нужна)). лично я не вижу необходимости в этой программе ее куда-то ставить

---

можно поставить перед writeln, тогда будет эффект, что компьютер "думает"

---

нам просто учитель написал программу и сказал добавить задержку,программу подключения библиотеки и очистка экрана

---

и сделать ввод элемента массива с клавиатуры

---

Прикрепил текст программы

---

спасибо большое

---

перед readln(m) нужно for i:=1 to 6 do

---

так там же ниже написано

---

и выше нужно. в паскале массив заполняется в цикле

---

хорошо