Регистрация
svetaalekperova
10.04.2022 22:13
Информатика
Есть ответ 👍

1.Що таке шаблон та формуляр-зразок документа?
2. Класифікація документів?
3. Розміщення реквізитів в документі та вимоги до них.
4. Вимоги до формату паперу та берегів документу.
5. Вимоги до виготовлення бланків.
6. Вимоги до текстів службових документів

187
221
Посмотреть ответы 1

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

angelinaholod72
angelinaholod72
4,4(76 оценок)

pascalabc.net

begin

  var n : = readinteger('n =');

  var a : = arrrandom(n, -99, 99);

  a.println;

  println('результат: ', (a.max + a.min) / 2)

end.

turbo pascal

program abcd;

uses crt;

const

  nn = 100;

var

  i, n, max, min: integer;

  a: array[1..nn] of integer;

 

begin

  clrscr;

  write('n = ');

  readln(n);

  randomize;

  max : = -32768;

  min : = 32767;

  for i : = 1 to n do

  begin

    a[i] : = random(199) - 99;

    write(a[i], ' ');

    if a[i] > max then

      max : = a[i]

    else if a[i] < min then

      min : = a[i]

  end;

  writeln;

  writeln('результат: ', (max + min) / 2);

  readkey

end.

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