Регистрация
laparoscopic
27.06.2021 23:38
Информатика
Есть ответ 👍

Написать программу на паскале 15 вариант заранее

103
298
Посмотреть ответы 2

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

00Alcatraz00
00Alcatraz00
4,6(25 оценок)

pascalabc.net

begin

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

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

  a.transform(p -> round(p, 2));

  a.println;

  var s : = readreal('s =');

  var i : = a.select((v, i) -> (abs(v - s), (p -> ;

  writeln('значение ', a[i], ', номер в массиве ', i+1)

end.

vickatrasyuk
vickatrasyuk
4,7(47 оценок)
ответ в адреса локальной мережи

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