//Если нужно будет перевести другую строку в цифры, то не забудь поменять параметр Size. В него нужно будет записать количество символов в строке
Program Test;
const Size = 19;
Var i, tmp: integer; Str, Resultat: string;
Begin
Str := 'yoonmin_in_my_heart';
for i := 1 to Size do
begin
tmp := ord(Str[i]);
Resultat := Resultat + tmp
end;
Writeln(Resultat);
End.
Задание 1
После выполнения алгоритма 3241 робот окажется в клетке B
Ответ : в клетке B
Задание 2
Если к числу 8 применить алгоритм 22212, то получится число 6.
Алгоритм 12212 преобразует число 1 в число 16.
Задание 3
А) 1 2 2 1 1
Мы получаем: 3 - 2 - 6 - 18 - 17 - 16
б) 2 2 2 1 1
Мы получаем 1 - 3 - 9 - 27 - 26 - 25
Задание 4
Двигаемся вперед на 45 см и поворачиваем на 45 градусов. И так 8 раз. Получается угол в фигуре будет равен 180-45=135. По формуле нахождения угла в правильном многоугольнике. 135=180*(n-2)/n
получается 135n=180n-360
45n=360
n=8
Ответ: правильный восьмиугольник.
A) Вкторная графика.
B) на распечатанном отсутствует треугольник.
Незачто :3
В нижнюю часть вводите текст который проверяется на достаточное количество букв, в верхнюю часть вводите искомое слово. Программа различает прописные и строчные буквы.
<span>Саму программу можете увидеть Alt+F11
</span>
Берешь мышь в руки, двигаешь ею стрелку к меня пуск далее в строке пишешь paint и там в списке он будет, нажимаешь на нее и пользуешься на здоровье