char40
?>

нужно сделать блок схему для информатики чтобы сварить 4 порции пщенной каши, нужшо взять 220г пшена, 1л молока и 30г сахара. с колько потребуется этих продуктов, чтобы сварить n порций каши?

Информатика

Ответы

dinadumno2114
По выполняемым функциям и возможности применения информационные технологии делят на используемые:1) в автономных компьютерах (ПЭВМ) и в локальных рабочих станциях (АРМ) в составе сетевых автоматизированных информационных систем (АИС) реального времени;2) в объектно-ориентированных, распределённых, корпоративных и иных локальных и сетевых информационно-поисковых, гипертекстовых и мультимедийных системах;3) в системах с искусственным интеллектом;4) в интегрированных АИС;5) в геоинформационных, глобальных и других системах.
Алла14
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
  var a:=ReadLines('m17.txt').JoinIntoString.ToIntegers;
  a.Println;
  var b:=a.Select((x,i)->Rec(x,i)).Where(x->x.Item1<0)
    .Select(x->x.Item2).ToArray;
  if b.Count<>2 then
    Writeln('Количество отрицательных элементов не равно двум')
  else begin
    a:=SeqFill(b[0],0).Concat(a.Skip(b[0]).Take(b[1]-b[0]+1))
      .Concat(SeqFill(a.Length-b[1]-1,0)).ToArray;
    a.Println
    end
end.

Тестовое решение:
23 14 7 15 0 13 -6 41 18 13 8 42 27 -11 3 19 10
0 0 0 0 0 0 -6 41 18 13 8 42 27 -11 0 0 0

Файл с исходными данными имеет имя m17.txt. Тестовый файл находится во вложении. Разбивка на строки сделана по 5 значений, но может быть совершенно произвольной. Также нет привязки именно к 17 числам, главное - чтобы отрицательных чисел было ровно два, иначе будет выдано сообщение о их неверном количестве.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

нужно сделать блок схему для информатики чтобы сварить 4 порции пщенной каши, нужшо взять 220г пшена, 1л молока и 30г сахара. с колько потребуется этих продуктов, чтобы сварить n порций каши?
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

MikhailNechaeva
Vasilisan
АлександровнаВладимирович1424
universal21vek116
anitanemtsewa
MAXIM76748
Yevsyukov1697
kav511
sharkova1443
kotovayaanastasia2069
Кольцова
Sergei
MN-Natusik80
arteevdimon
tsatskina857