Var s,s0:string;
begin
writeln('Введите строку s:');
readln(s);
writeln('Введите строку s0:');
readln(s0);
if pos(s,s0)>0 then writeln('ДА') else writeln('НЕТ');
end.
Пример:
Введите строку s:
две
Введите строку s0:
Даны две строки
ДА
Ответ:
Объяснение:
int number = 1; //тут нужное число
number = System.Math.Abs(number); //Данная функция возвращает абсолютное значение числа. То бишь, всегда положительное.
// Проверять отдельно, меньше ли число 0 и множить на -1 не нужно. Все через эту функцию.