Регистрация
блаблаблатруляля
09.09.2021 22:41
Информатика
Есть ответ 👍

Составить алгоритм на языке программирования , который выводит среднее арифметическое наибольшего и наименьшего из 20 элементов , имеющих значение из интервала [-10; 10]

283
325
Посмотреть ответы 2

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

nicky234
nicky234
4,8(68 оценок)
Pascal: const n=20; var a: array[1..n] of integer; max, min, i: integer; begin max: =-11; min: =11; for i: =1 to n do begin a[i]: =random(20)-10; {или readln(a[i]); если нужен конкретный ввод} if a[i]> max then max: =a[i]; if a[i]< min then min: =a[i]; end; writeln((max+min)/2); end.
soymapoIina
soymapoIina
4,5(28 оценок)

var

  a, s: real;

 

begin

  s: = 0;

  repeat

    writeln('введите положительное число');

    readln(a);   //вводим положительное число

    if a < 0 then   {если введено не положительное число, печатаем сообщение об этом и начинаем цикл сначала}

    begin

      writeln('введено не положительное число. введите число еще раз.');

      continue;

    end;

    s: = s + a;

  until a = 0;

  writeln('сумма введенных чисел равна:   ', s);   //выводим сумму

end.

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