Регистрация
AnzhelaBagdasaryan
11.01.2020 01:35
Информатика
Есть ответ 👍

Из деревни Абрамцево в Рыкино ведут три дороги. А из Рыкина в Колино -четыре дороги. Сколькими можно проехать из села Абрамцево в Колино через Рыкино. Изобразите схему и граф !!​

282
353
Посмотреть ответы 1

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

ariadnaorekhova
ariadnaorekhova
4,6(7 оценок)
Pascalabc.net 3.4.2, сборка 1827 от 08.10.2018 внимание! если программа не работает, обновите версию!

begin

  var a : = arrrandom(readinteger('n='), -50, 50);

  a.println;

  writeln('сумма отрицательных чисел равна ', a.where(t -> t < 0).sum);

  writeln('сумма положительных чисел равна ', a.where(t -> t > 0).sum);

  write('максимальное по модулю число ');

  var (m1, m2) : = (a.min, a.max);

  if abs(m1) > abs(m2) then m1.println

  else m2.println

end.

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