3. Дана програм
ПОКА нашла
(333) ИЛИ нашлось (555)
спи нашлось (555)
о заменить (555, 3)
ИНАЧЕ заменить (333, 5)
КОНЕЦ
КОНЕЦ
Какая строка по
ниже программы
ока получится в результате применения приведенной
ограммы к строке, состоящей из:
со идущих подряд цифр 5; б) 65 идущих подряд цифр 5;
по идущих подряд цифр 5; г) 93 идущих подряд цифр 5;
146 идущих подряд цифр 5; е) 156 идущих подряд цифр 5;
) 184 идущих подряд цифр 5; 3) 193 идущих подряд цифр 5?​

// Известно, что Х кг шоколадных конфет стоит А рублей,
// а Y кг ирисок стоит В рублей. Определить, сколько стоит 1 кг
// шоколадных конфет, 1 кг ирисок, а также во сколько раз шоколадные конфеты дороже ирисок.

var x,y,a,b: real;
begin
  writeln('Введите массу шоколадных конфет');
  readln (x);
  writeln('Введите сумму потраченную на покупку шоколадных конфет');
  readln (a);
  writeln('Введите массу ирисок');
  readln (y);
  writeln('Введите сумму потраченную на покупку ирисок');
  readln (b);
  writeln ('килограмм шоколадных конфет стоит ',(a/x):0:2,' рублей');//(a/x):0:2 - округряем до сотых)
  writeln ('килограмм ирисок стоит ',(b/y):0:2,' рублей');
  Writeln ('Шоколадные конфеты дороже ирисок в ',(a/x)/(b/y):0:1,' раз');// - округляем результат до десятых
 end.

//Дана длина ребра куба а. Найти его объем и площадь поверхности

Var a: real;
begin
  writeln ('введите длину ребра куба');
  readln (a);
  while a<0 do
    begin
      writeln ('вы ввели не допустимое значение попробуйте еще раз');
      writeln ('введите длину ребра куба');
      readln (a);
    end;
  writeln ('площадь куба равна ',a*a*6);
  writeln ('объем куба равен ',a*a*a);
end.

Все цифры рисуются начиная с левого верхнего угла

Цифра_0
сместиться на вектор (1,0)
сместиться на вектор (0,-2)
сместиться на вектор (-1,0)
сместиться на вектор (0,2)

Цифра_6  
сместиться на вектор (1,0)
сместиться на вектор (0,-2)
сместиться на вектор (-1,0)
сместиться на вектор (0,2)  

Цифра_7
сместиться на вектор (1,0)
сместиться на вектор (-1,-1)
сместиться на вектор (0,-1)  

Цифра_8
Сместиться на вектор (1,0)
Сместиться на вектор (0,-1)
Сместиться на вектор (-1,0)
Сместиться на вектор (0,1)
поднять перо
сместиться на вектор (0,-1)
опустить перо
Сместиться на вектор (1,0)
Сместиться на вектор (0,-1)
Сместиться на вектор (-1,0)
Сместиться на вектор (0,1)  

Цифра_9  
Сместиться на вектор (1,0)
Сместиться на вектор (0,-1)
Сместиться на вектор (-1,0)
Сместиться на вектор (0,1)
Поднять перо
Сместиться на вектор (1,-1)
Опустить перо
Сместиться на вектор (-1,-1)