Составьте программу в Паскале определения наименьшего числа из трех
Составьте программу в Паскале определения наименьшего числа из трех
Гость
Ответ(ы) на вопрос:
ГостьЭто легко пошевели мозгами всё получится 100%
Гостьvar
i:integer;
min:real;
a:array[1..3]of real;
begin
for i:=1 to 3 do
begin
writeln(i,' число:');
readln(a[i]);
if i=1 then min:=a[1];
if a[i]
Не нашли ответ?
Похожие вопросы