СДЕЛАЙТЕ БЛОК-СХЕМУ И НАПИШИТЕ ПРОГРАММУ ДЛЯ ДАННОЙ ЗАДАЧИ:Ввести с клавиатуры массив из...

Question

СДЕЛАЙТЕ БЛОК-СХЕМУ И НАПИШИТЕ ПРОГРАММУ ДЛЯ ДАННОЙ ЗАДАЧИ:
Ввести с клавиатуры массив из 5 элементов, найти минимальный из них.

Answer 1

Uses crt;
var a:array [1..5] of integer;
min,i:integer;
begin
clsclr;
for i:=1 to 5 do
read(a[i]);
min:=a[1];
for i:=2 to 5 do
if a[i]write('min=', min);
readkey;
end.

---

Comments

мне нужно на free pascal

---

нужно было добавить две строки первую и предпоследнюю

---

а блок схема так же остается?

---

да, она для всех программ

---

а что за знак вопроса в ромбике?

---

а к этой задачи наподобие блок схему нельзя http://f-picture.net/lfp/s010.radikal.ru/i312/1409/4a/909df177f312.jpg/htm ? ИЛИ ЭТО СОВЕРШЕННО РАЗНЫЕ ЗАДАЧИ?