Var
s1,s2 : String;
n,i : Integer;
Begin
n:=0;
Readln(s1);
Readln(s2);
For i:=1 to Length(s1) do If Pos(s1[i],s2)=0 then Inc(n);
Writeln(n);
end.
При возведении 2 в степень есть закономерность последнего числа:
2-4-8-6 и она повторяется через каждые 4 степени.
539/4=134 (остаток 3)
Находим 3 число в ряде - 8.
Последняя цифра в 2^539 - 8.
1 КБит = 128 Байт
5 КБит = 640 Байт
ВВОД ДАННЫХ инф. процесс непосредственного ввода в систему данных с носителя данных, клавиатуры или другого устройства и последующая запись их в основную память; прямой ввод данных это диалоговый процесс ввода данных в систему и их записи в оперативные файлы
Когда ты присваиваешь переменной какое-то значение ты меняешь содержание переменной