На языке программирования паскаль составить программу суммы нахождения суммы вводимых с клавиатуры положительных чисел . печать результата по вводу 0 ( используя цикл while т. е. предусловие ).

var

  a, s: real; //a - вводимое с клавиатуры число, s - сумма чисел

begin

  a: = 1;   //присваиваем начальное значение, чтобы цикл выполнился

  s: = 0;

  while a < > 0 do    

  begin

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

    readln(a);

    if a < 0 then

    begin

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

      continue; {если а - не положительное число, вводим число заново}

    end;

    s: = s + a;

  end;

  writeln('сумма:   ', s);   //выводим сумму

end.

если предположить, что сначала уходили те, кто надел обувь большего размера, то таких будет, как минимум, двое. третий уходящий может надеть свою обувь. поэтому правильным ответом будет (б) 2 человека.

отношения между объектами - диаграммы эйлера-венна

объект-фотографии

стоимость объекта   -числа

р. об.- эскиз

ф. р. об. - чертежа

эл. с. об.  -схемы

  цв. об.-рисунка