Суть такого свойства алгоритма как дискретность заключается в том, что... Алгоритм должен обеспечивать решение не одной конкретной задачи, а некоторого класса задач данного типа

Исполнитель алгоритма не должен принимать решения, не предусмотренные составителем алгоритма

Алгоритм должен быть разбит на последовательность отдельных шагов

Записывая алгоритм для конкретного исполнителя, можно использовать лишь те команды, что входят в систему его команд

При точном исполнении всех команд алгоритма процесс должен прекратиться за конечное число шагов, приведя к определенному результату​

Жила была девочка Настя.Она очень хотела научиться  рисовать.В школе на уроках  все смеялись над её рисунками и от  того  она приходила домой и плакала.Как то раз  Настя пришла  домой  вся заплаканная,включила  компьютер  и тут  на экран выскочил весёлый  человечек:

 -Не  плачь ,милая  девочка!Я тебе!Я живу  в твоём компьютере и  всегда с умилением  наблюдаю  за твоими занятиями.Пойдём  со мной!Не бойся !

Настя  приложила свою руку к компьютеру и тут же  оказалась по ту сторону  экрана

Дальше, Анастасия,  придумай пару  предложений  о путешествии их,если  понравилась идея и  на прощание человечек  подарит Насте программу  граф.редактор.И  всё  у неё будет  хорошо

var j, a, b, n: integer;

label 1;

begin

1: randomize;

  a: = random (9);

  b: = random (9);

  write (a, '*', b, '=');

  read (n);

  if n = (a * b) then writeln ('відповідь вірний! ')

            else writeln ('відповідь неправильний! ');

  writeln ('продовжуватимеш? ');

  writeln ('якщо так то натисни 1');

  writeln ('якщо немає то натисни 2');

  read (j);

  if j = 1 then goto 1;

  if j = 2 then writeln ('до побачення! ');

end.

начебто так, точно не пам'ятаю.