Что произойдёт при попытке исполнения инструкции?
t = range (2, 4, -1)
A. в переменной t будет сгенерировано пустое множество
B. будет возвращено сообщение об ошибке
C. переменной t будет присвоено значение 4
D. переменной t будет присвоено значение 2

1. начало

2. оденься

3. выйти из дома

4. если есть машина

  5.то сесть в машину

  6. завести машину

  7.начать путь следования по дороге

  8.доехать до села

  9. выйти из машины

иначе 10. дойти до остановки

          11.дождаться автобуса

          12. зайти в автобус

          13. доехать до села

          14. выйти из автобуса

15. конец

если 25(из которых 15 сто пудов в школьной и 10 смешанные) берут в школьной, то 10 человек берут в районной.

если 20(из которых 10 сто пудов берут в районной 10 смешанные), то 15 в школьной

получается 1) 10 человек; 2)15 человек; 3)10 чкловек; 4)10 чел; 5)15 чел. 

uses graphabc,crt; const t=500;

beginsetwindowsize (600, 600); setpencolor (clblack); setbrushcolor (clblack); rectangle (45, 45, 105, 225 ); setpencolor (clred); setbrushcolor (clred); circle (75, 75, 25); setpencolor (clyellow); setbrushcolor (clyellow); circle (75, 130, 25); setpencolor (clgreen); setbrushcolor (clgreen); circle (75, 185, 25); setpencolor (clblack); setbrushcolor (clblack); rectangle (70, 225, 80, 300); setbrushcolor (cldkgray); circle (75, 130, 25); setbrushcolor (clgreen); circle (75, 185, 25);

repeatsetbrushcolor (cldkgray); circle (75, 185, 25); setbrushcolor (clred); circle (75, 75, 25); delay(t); setbrushcolor (cldkgray); circle (75, 75, 25); setbrushcolor (clyellow); circle (75, 130, 25); delay(t); setbrushcolor (cldkgray); circle (75, 130, 25); setbrushcolor (clgreen); circle (75, 185, 25); delay(t); until keypressed;

end.

var  a, s: integer; // целочисленный тип данныхbeginwriteln('введите число: ');   readln(a); // вводим число (можно больше трех знаков)  while a < > 0 do  // пока остались цифры в числе   begin      s : = s + (a mod 10); // отбираем последнюю цифру числа и прибавляем к сумме      a : = a div 10; // стираем последнюю цифру числа  end;   writeln('сумма цифр = ', s) // выводим результатend.