• В массиве хранится информация о стоимости 1 кг 20 видов конфет. Определить, сколько стоят самые дешёвые конфеты.

Ответы 1

  • varmin,i:integer;x: array [1..1000] of integer;beginwriteln('стоимость за 1 кг 20 видов конфет:'); for i:=1 to 20 do begin x[i]:=random(71)+20; write(x[i]:4); end; min:=x[1]; writeln; for i:=2 to 20 do begin if min>x[i] then min:=x[i]; end; writeln('самые дешёвые конфеты стоят ',min);end.

    • Автор:

      leanna
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years