Регистрация
revunova
04.05.2020 12:10
Информатика
Есть ответ 👍

16 балов. Информатика 9 класс, нужна

245
446
Посмотреть ответы 1

Ответы на вопрос:

StasSav06
StasSav06
4,8(61 оценок)

uses crt;

var

  a: array[1..100] of integer;   i,min: integer; begin

  randomize;   write('введи количество элементов массива: '); read(i);   min: =100;

  clrscr;   writeln('массив: ');   for i: =1 to i do  begin    a[i]: =random(10)-9;     write(a[i]: 4);     if a[i]< min then min: =a[i];   end;   writeln;   write('минимальный элемент массива: ',min); end.

Популярно: Информатика