Var
s:string;
begin
Writeln('Введите строку');
Readln(s);
Delete(s,1,2);
Writeln(s)
end.
Скинь фотку ребуса''''''''''
1. Пишешь ЕСЛИ введенное число>=13:
выведите ХОРОШО
Если<=13
выведите плохо.
2. Вводится ав
если остаток от деления ав на 10 больше или равен частному от деления на 10
--- Выведите остаток
Если частное от деления ав на 10 больше остатка
------выведите частное
Решение во вложении. Не забудьте разрешить исполнение макросов.
Исходную матрицу надо выделить, затем щелкнуть по кнопке, запускающей решение.
ПРИНТЕР<span> - , а, м., инф. Печатающее устройство в компьютерах. Принтерный - относящийся к принтеру, принтерам.</span>